# \donttest{
# Load example data
cluster_result <- readRDS(system.file("extdata", "cluster_result.rds",
package = "richCluster"))
tdot <- term_dot(cluster_result, cluster = 1)
tdot
# }
Run the code above in your browser using DataLab