Description Usage Arguments Details Value Author(s) See Also Examples
Export a generic data frame, matrix or table to a spreadsheet and save the file.
1 2 3 |
wb |
a |
sheet |
numeric or character: a worksheet name (character) or position (numeric) within |
dataset |
the rectangular structure to be written. Can be a data frame, table, matrix or similar. |
title |
character: an optional overall title to the table. Default ( |
addRownames |
logical: should a column of row names be added to the left of the structure? (default |
rowNames |
character: vector of row names. Default |
rowTitle |
character: the title to be placed above the row name column (default "Name") |
colNames |
character: vector of column names to replace the original ones. Default |
row1, col1 |
numeric: the first row and column occupied by the output. |
purge |
logical: should |
This function is a convenience wrapper for getting practically any rectangular data structure into a spreadsheet, without worrying about conversion or spreadsheet-writing technicalities.
If the structure is not a data frame (or inherited from one), but a table or matrix, the function will convert it into one using as.data.frame.matrix
, because data frames are what the underlying function writeWorksheet
can export.
See the XLtwoWay
help page, for behavior regarding new-sheet creation, overwriting, etc.
The function returns invisibly, after writing the data into sheet
and saving the file.
Assaf P. Oron <assaf.oron.at.seattlechildrens.org>
For two-way contingency tables, see XLtwoWay
.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 | t1<-XLwriteOpen("generic1.xls")
### Just a meaningless matrix; function converts to data.frame and exports.
XLgeneric(t1,"s1",matrix(1:4,nrow=2))
### Now adding row names, title, etc. Note adding the title shifts the table one row down.
XLgeneric(t1,"s1",matrix(1:4,nrow=2),col1=5,addRownames=TRUE,
title="Another Meaningless Table",rowTitle="What?",
rowNames=c("Hey","You!"))
###... and now adding some text
XLaddText(t1,"s1","You can also add text here...",row1=10)
XLaddText(t1,"s1","...or here.",row1=11,col1=8)
XLaddText(t1,"s2",
"Adding text to a new sheet name will create that sheet!"
,row1=2,col1=2)
### A more complicated example, showing how a "flattened" 3-way table might be exported:
carnames=paste(rep(c(4,6,8),each=2),"cylinders",rep(c("automatic","manual"),3))
XLgeneric(t1,'cars',ftable(mtcars$cyl,mtcars$vs,mtcars$am),
addRownames=TRUE,rowNames=carnames,rowTitle="Engine Type",colNames=c("S","V"))
cat("Look for",paste(getwd(),"generic1.xls",sep='/'),"to see the results!\n")
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.