additional sample code for plotting dendrograms

natverse · Mar 30, 2024 · 72d6cf5 · 72d6cf5
1 parent 05999a3
commit 72d6cf5
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 0 deletions.
diff --git a/R/cosine.R b/R/cosine.R
@@ -179,6 +179,12 @@ is.mct <- function(x) {
 #' lalmeta=cf_meta(lalhc$labels)
 #' lalmeta=coconat::add_cluster_info(lalmeta, lalhc, h=0.75)
 #'
+#' # plot results in a big dendrogram
+#' pdf("lalhc.pdf", width = 150,height = 20, family = 'Courier')
+#' plot(lalhc, labels=glue::glue("{type}_{abbreviate_datasets(dataset)}{side}",
+#'  .envir =lalmeta), hang = -.01, cex=.7)
+#' dev.off()
+#'
 #' # look at the results interactively
 #' cf_cosine_plot(cf_ids("/type:LAL.+"), interactive=TRUE)
 #' }

diff --git a/man/cf_cosine_plot.Rd b/man/cf_cosine_plot.Rd