View source: R/datastructures.R
1 |
file |
|
... |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | ##---- Should be DIRECTLY executable !! ----
##-- ==> Define data, use random,
##-- or do help(data=index) for the standard data sets.
## The function is currently defined as
function (file, ...)
{
d0 <- read.xlsx(file, ...)
for (i in seq_len(ncol(d0))) {
cl <- class(d0[[i]])
if (cl == "factor") {
v <- as.character(d0[[i]])
d0[[i]] <- type.convert(v)
}
}
d0
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.