Nothing
## ---- echo = FALSE------------------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>")
## ---- echo = TRUE, eval=FALSE-------------------------------------------------
# library(madrat, quietly = TRUE)
# retrieveData("EXAMPLE", rev = 42, puc = TRUE, extra = "Extra Argument")
## ---- echo = TRUE, eval=FALSE-------------------------------------------------
# calcExample <- function() {
# return(list(x = data,
# putInPUC = FALSE))
# }
## ---- echo = TRUE, eval=FALSE-------------------------------------------------
# fullEXAMPLE <- function(rev = 0, dev = "", extra = "Example argument") {
#
# "!# @pucArguments extra"
#
# writeLines(extra, "test.txt")
#
# if (rev >= 1) {
# calcOutput("TauTotal", years = 1995, round = 2, file = "fm_tau1995.cs4")
# }
# if (dev == "test") {
# message("Here you could execute code for a hypothetical development version called \"test\"")
# }
# # return is optional, tag is appended to the tgz filename, pucTag is appended to the puc filename
# return(list(tag = "customizable_tag",
# pucTag = "tag"))
# }
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.