inst/charts/13.R

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'
)
NicolasJBM/writer documentation built on Aug. 12, 2019, 2:36 p.m.