This function creates a sankey plot for a selected gene including transcription factor interactions.
Source:R/plot.R
plot_graph_sankey_tf.Rd
This function creates a sankey plot for a selected gene including transcription factor interactions.
Usage
plot_graph_sankey_tf(
lrobj_tbl,
pagerank_table,
target = NULL,
cluster = NULL,
target_type = NULL,
plt_name = NULL,
threshold = 50,
save_path = NULL
)
Arguments
- lrobj_tbl
LRobject table with all data
- target
gene
- cluster
cluster
- target_type
type of target
- plt_name
plot title
- threshold
top_n n value
Examples
paths <- c('CTR' = system.file("extdata",
"CTR_LR.csv",
package = "CrossTalkeR"),
'EXP' = system.file("extdata",
"EXP_LR.csv",
package = "CrossTalkeR"))
output = system.file("extdata", package = "CrossTalkeR")
genes <- c('TGFB1')
data <- generate_report(paths,
genes,
out_path=paste0(output,'/'),
threshold=0,
out_file = 'vignettes_example.html',
output_fmt = "html_document",
report = FALSE)
#> Create a Differential Table
#> Calculating CCI Ranking
#> EXP_x_CTR
#>
#> Calculating GCI Ranking
#> EXP_x_CTR
#> Annotating the top Cell Genes
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> 'select()' returned 1:many mapping between keys and columns
#> Adding missing grouping variables: `cellpair`
#> Adding missing grouping variables: `cellpair`
#> Network Analysis Done
#> Analysis Complete