After we transfer the reference LDA model to query data (transfer_LDA()), we can use this function to visualize the comparison of reference LDA model and query data.

sankey_comparison(
  ldaOut,
  dist,
  a_prefix = "reference_",
  b_prefix = "query_",
  height = 1600,
  width = 800,
  fontSize = 12
)

Arguments

ldaOut

reference LDA model

dist

transferred model of query data

a_prefix

prefix of label of reference data

b_prefix

prefix of label of query data

height

output height of sankey diagram

width

output width of sankey diagram

fontSize

font size

Examples

if (FALSE) { dist <- query_SeuratObj@misc$dist sankey_comparison(ldaOut=ref_ldaOUt, dist=dist, a_prefix="reference_", b_prefix="query_") %>% saveNetwork(file = "sankey_comparison.html") }