library(tibble)
library(dplyr)
library(tidyr)
library(plotly)
chart <- plot_ly(
labels = c("Eve", "Cain", "Seth", "Enos", "Noam", "Abel", "Awan", "Enoch", "Azura"),
parents = c("", "Eve", "Eve", "Seth", "Seth", "Eve", "Eve", "Awan", "Eve"),
values = c(65, 14, 12, 10, 2, 6, 6, 4, 4),
type = 'sunburst',
branchvalues = 'total'
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.