MTRead <- function(fileName){
out <- readLines(system.file("templates", fileName, package = "MetaTurkR"))
out <- paste(out,collapse = "\n")
return(out)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.