plot_ly(x = ~rnorm(100), type = "histogram")
DT::datatable(iris)
leaflet::leaflet() %>% addTiles()