GGPLOT - geom_density

Computes and draws kernel density estimate and then convert them with ggplotly.

p <-    
 ggplot(diamonds, aes(carat)) +
  geom_density()
plotly::ggplotly(p)
p <-    
 ggplot(diamonds, aes(y = carat)) +
  geom_density()
plotly::ggplotly(p)
## Error in data.frame(..., check.names = FALSE): arguments imply differing number of rows: 512, 0
p <-    
 ggplot(diamonds, aes(carat)) +
  geom_density(adjust = 1/5)
plotly::ggplotly(p)
p <-    
 ggplot(diamonds, aes(carat)) +
  geom_density(adjust = 5)
plotly::ggplotly(p)
p <-    
 ggplot(diamonds, aes(depth, colour = cut)) +
  geom_density() +
  xlim(55, 70)
plotly::ggplotly(p)
## Warning: Removed 45 rows containing non-finite values (stat_density).
p <-    
 ggplot(diamonds, aes(depth, fill = cut, colour = cut)) +
  geom_density(alpha = 0.1) +
  xlim(55, 70)
plotly::ggplotly(p)
p <-    
 ggplot(diamonds, aes(carat, fill = cut)) +
  geom_density(position = "stack")
plotly::ggplotly(p)
p <-    
 ggplot(diamonds, aes(carat, after_stat(count), fill = cut)) +
  geom_density(position = "stack")
plotly::ggplotly(p)
p <-    
 ggplot(diamonds, aes(carat, after_stat(count), fill = cut)) +
  geom_density(position = "fill")
plotly::ggplotly(p)