# NOT RUN {
data(pokemon)
dat <- data_to_boxplot(pokemon, height)
highchart() %>%
hc_xAxis(type = "category") %>%
hc_add_series_list(dat)
dat <- data_to_boxplot(pokemon, height, type_1, name = "height in meters")
highchart() %>%
hc_xAxis(type = "category") %>%
hc_add_series_list(dat)
# }
# NOT RUN {
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab