knitr::opts_chunk$set(echo = TRUE)
#prep file if needed file. <- here::here("inst/extdata/Buzatto_et_al_2015_frog_arm_dimorph/Buzatto_2015_Evolution_frog_arm_dimorphism_2.csv") frogarms <- read.csv(file., comment.char="#") names(frogarms)[1] <- "i.frog" frogarms$i.row <- 1:nrow(frogarms) frogarms <- frogarms[,c("i.row","i.frog","sex","mass","sv.length","forearm","arm")] save(frogarms, file = here::here("data/frogarms.RData"))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.