knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(jeksterslabRdatarepo) library(knitr) library(DT) library(GGally) library(plotly) library(psych)
data( heights, package = "jeksterslabRdatarepo" )
datatable(heights)
p <- ggpairs( data = heights, mapping = aes(color = gender), columns = c(2, 3, 5, 6) ) ggplotly(p)
plot_ly( data = heights, type = "scatter", mode = "markers", x = ~father, y = ~height, color = ~gender )
plot_ly( data = heights, type = "scatter", mode = "markers", x = ~mother, y = ~height, color = ~gender )
kable( x = summary( heights ) )
kable( x = describe( heights ) )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.