##' Change working directory within project to "analysis"
##' @title chwd.analysis
##' @return switch dir
##' @author Kieran Healy
##' @export
chwd.analysis <-
function(){
chwd("analysis")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.