`xport.namestr.header` <- function( nvar )
{
.C("fill_namestr_header",
nvar = sprintf("%04.4d", as.integer(nvar)), # Number of variables *AS A STRING*
PACKAGE="SASxport"
)
.Call("getRawBuffer", PACKAGE="SASxport")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.