Density plots in Highcharter

library(highcharter)

## Highcharts (www.highcharts.com) is a Highsoft software product

## which is not free for commercial and Governmental use

x <- rnorm(1000)
y <- rexp(1000)

hcdensity(x) %>%
  hc_add_series_density(y, area = TRUE)

hcdensity(density(x), area = TRUE) %>% # not the correct usage but it's possible
  hc_add_series_density(density(y))

hchart(density(x), area = TRUE) %>%
  hc_add_series_density(density(y), area = TRUE)