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.