Nothing
libname <- "Rsafd"
pkgname <- "Rsafd"
## .First.lib <- function(libname,pkgname)
## {
## cat("Hello, Welcome to Rsafd, the library of data sets and R functions for the book\n
## Statistical Analysis of Financial Data in R & S\n")
## cat("Loading empirfunc and kreg object code\n")
## # For debugging purposes
## cat(paste("libname = ",libname,"\n",sep="") )
## cat(paste("pkgname = ",pkgname,"\n",sep="") )
## # LIBPATH <- "/Library/Frameworks/R.framework/Versions/2.5/Resources/library/Rsafd/libs/i386/"
## LIBFULLNAME <- file.path(LIBPATH , paste("Rsafd",.Platform$dynlib.ext, sep=""))
## #library.dynam("Rsafd")
## #library.dynam("Rsafd", package="Rsafd", lib.loc=LIBPATH)
## }
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.