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