Nothing
#' Declare symbols
#' @name declare
#' @export
#' @param ... Symbols to declare
#' @param .envir \code{environment} to store the symbols
#' @examples
#' declare(x,y=numeric(),z=integer())
declare <- function(...,.envir=parent.frame()) {
args <- dots(...)
Map(function(name,value) {
if(nchar(name) == 0L) {
name <- deparse(value)
value <- NULL
}
assign(name, eval(value, .envir), envir = .envir)
},getnames(args),args)
invisible(NULL)
}
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.