Nothing
xport.character <- function( value, width )
{
if(length(value)!=1) stop("Only a single character value is permitted: '", value, "'")
if(is.na(value)) value <- ""
.C("fill_character_field",
value = as.character(value),
width = as.integer(width),
PACKAGE="SASxport"
)
.Call("getRawBuffer", PACKAGE="SASxport")
}
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.