knife<-read.csv("~/knifecrime/data-raw/t1.csv", check.names=T)
devtools::use_data(knife)
rm(knife)
knife<-readr::read_csv("~/knifecrime/data-raw/t1.csv")
knife$phase<-forcats::as_factor(knife$phase)
devtools::use_data(knife, overwrite = T)
rm(knife)
?knife
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.