View source: R/visClustering.R
| visClusteringByColor | R Documentation |
Network visualization clustering options - by color.
visClusteringByColor( graph, colors, label = "Cluster on color : ", shape = "database", force = FALSE )
graph |
: a visNetwork object |
colors |
: Character/vector. colors we want to cluster |
label |
: Character. Label put before value(s). See example |
shape |
: Character. Shape of cluster(s) if different shapes between nodes or |
force |
: If |
set.seed(124)
nodes <- data.frame(id = 1:10, color = c(rep("blue", 6), rep("red", 3), rep("green", 1)))
edges <- data.frame(from = round(runif(6)*10), to = round(runif(6)*10))
visNetwork(nodes, edges) %>%
visClusteringByColor(colors = c("blue"))
nodes <- data.frame(id = 1:10, label = paste("Label", 1:10),
group = sample(c("A", "B"), 10, replace = TRUE))
edges <- data.frame(from = c(2,5,10), to = c(1,2,10))
visNetwork(nodes, edges) %>%
visGroups(groupname = "A", color = "red", shape = "square") %>%
visGroups(groupname = "B", color = "yellow", shape = "triangle") %>%
visClusteringByColor(colors = c("red"), label = "With color ") %>%
visClusteringByGroup(groups = c("B"), label = "Group : ") %>%
visLegend()
visNetwork(nodes, edges) %>%
visGroups(groupname = "A", color = "red", shape = "triangle") %>%
visGroups(groupname = "B", color = "yellow", shape = "triangle") %>%
visClusteringByGroup(groups = c("A","B")) %>%
visLegend()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.