knitr::opts_chunk$set(echo = FALSE, message = FALSE) data_dir <- "~/Documents/csu/stat555/data/"
library(dplyr) # extract a subset of the mtcars data df <- mtcars %>% mutate(make_model = row.names(mtcars)) %>% filter(cyl == 4) %>% select(make_model, mpg, wt) %>% mutate(wt = wt*1000) %>% arrange(make_model)
library(knitr) kable(df)
You can also embed plots, for example:
plot(pressure)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.