knitr::opts_chunk$set(echo = TRUE, message=FALSE, warning=FALSE)
require(qacr) require(knitr) require(kableExtra) x <- contents(coffee)
r x$dfname
.The data frame has r x$nrow
rows and r x$ncol
columns.
kable(x$overall) %>% kable_styling(bootstrap_options=c("striped", "hover"), full_width=FALSE, position="left")
dfPlot(coffee)
kable(x$qvars) %>% kable_styling(bootstrap_options=c("striped", "hover"), full_width=FALSE, position="left")
histograms(coffee)
kable(x$cvars) %>% kable_styling(bootstrap_options=c("striped", "hover"), full_width=FALSE, position="left")
barcharts(coffee)
corplot(coffee, sort=TRUE,lab_size=2)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.