HTML(paste('<textarea id="inputTextToSave6" style="width: 700px; height: 250px;" rows="3" cols="40"><<echo=FALSE, results=hide>>= questions <- solutions <- NULL questions[1] <- "',
tr("altmista"),
'" solutions[1] <- "',
tr("respmista"),
'" questions[2] <- "',
tr("altmistb"),
'" solutions[2] <- 6 #',
tr("tquestaon"),
' @ \\begin{question} ',
tr("quesmista"),
' <<echo=FALSE, results=hide, results=tex>>= answerlist(questions) @ \\end{question} \\begin{solution} <<echo=FALSE, results=hide, results=tex>>= answerlist(format(solutions)) @ \\end{solution} %% META-INFORMATION %% \\extype{cloze} %% \\exsolution{\\Sexpr{paste(solutions, collapse = "|")}} %% \\exclozetype{string|num} </textarea>',
sep=''))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.