Plots dotplot to compare ligand-receptor rankings from spatial and expression information
plotRankSpatvsExpr(
gobject,
combCC,
expr_rnk_column = "LR_expr_rnk",
spat_rnk_column = "LR_spat_rnk",
dot_color_gradient = NULL,
midpoint = deprecated(),
gradient_midpoint = 10,
gradient_style = c("divergent", "sequential"),
size_range = c(0.01, 1.5),
xlims = NULL,
ylims = NULL,
selected_ranks = c(1, 10, 20),
show_plot = NULL,
return_plot = NULL,
save_plot = NULL,
save_param = list(),
default_save_name = "plotRankSpatvsExpr"
)
giotto object
combined communication scores from combCCcom
column with expression rank information to use
column with spatial rank information to use
character. continuous colors to use. palette to use or vector of colors to use (minimum of 2).
deprecated
numeric. default = 10. midpoint of colors
either 'divergent' (midpoint is used in color scaling) or 'sequential' (scaled based on data range)
size ranges of dotplot
x-limits, numerical vector of 2
y-limits, numerical vector of 2
numerical vector, will be used to print out the percentage of top spatial ranks are recovered
logical. show plot
logical. return ggplot object
logical. save the plot
list of saving parameters, see showSaveParameters
default save name for saving, don't change, change save_name in save_param
ggplot
g <- GiottoData::loadGiottoMini("visium")
#> 1. read Giotto object
#> 2. read Giotto feature information
#> 3. read Giotto spatial information
#> 3.1 read Giotto spatial shape information
#> 3.2 read Giotto spatial centroid information
#> 3.3 read Giotto spatial overlap information
#> 4. read Giotto image information
#>
#> checking default envname 'giotto_env'
#> a system default python environment was found
#> Using python path:
#> "/usr/bin/python3"
exprCC <- exprCellCellcom(g,
cluster_column = "leiden_clus",
feat_set_1 = "Gm19935", feat_set_2 = "9630013A20Rik"
)
spatialCC <- spatCellCellcom(
gobject = g, cluster_column = "leiden_clus",
feat_set_1 = "Gm19935", feat_set_2 = "9630013A20Rik", verbose = "a lot",
random_iter = 10
)
#> Error in loadNamespace(x): there is no package called ‘future.apply’
combCC <- combCCcom(spatialCC = spatialCC, exprCC = exprCC)
#> Error in eval(expr, envir, enclos): object 'spatialCC' not found
plotRankSpatvsExpr(gobject = g, combCC = combCC)
#> Error in eval(expr, envir, enclos): object 'combCC' not found