ukoenig at med.uni-marburg.de
2008-Feb-15 15:59 UTC
[R] Transfer Crosstable to Word-Document (2. attempt)
# Dear list, # I am an R-beginner and # spent the last days looking for a method to insert tables produced # with R into a word document. I thought about SPPS: copy a table from # an SPO-file and paste it into a word document # (if needed do some formatting with that table). # Annother idea was, to produce a TEX-file, # insert it and make it a word-table. # I found the following libraries, which seemed to be promising: # xtable # prettyR # R2HTML # Hmisc # SciViews / svViews ####################################################################### ## My example: a crosstable (made with CrossTable from lib gmodels #### ####################################################################### library(gmodels) library(xtable) library(svViews) # Data for crosstabulation set.seed(1) n <- 200 sex <- sample(c("f","m"),n,T) state <- sample(c("AL","AK","CA"),n,T) #Create crosstab ct <- CrossTable(state, sex, expected=TRUE, format="SPSS", digits=1) ct #display crosstab on screen #Trie to produce a html file xtable(ct) #Error message: No method! methods(xtable) #Try to create a rich formatted table and insert it into Word #with svViws, but only a little part of crosstab it inserted docdir <- "r:\\r" WordOpen(file.path(docdir, "cross.doc")) viewfile <- view(ct, type = "summary", browse = FALSE) WordGoto("ctview") WordInsertFile(viewfile, TRUE) #only a little part of crosstab inserted WordActivate(async = TRUE) #How could I create the latex-code for the crosstable? w <- latex(ct) #would that work? # I could not test this, because I didn?t install Miktex yet # (I will do this soon) Can someone help me? Thanks in advance Udo ------------------------------ Udo Koenig Clinic for child and adolescent psychiatry University of Marburg / Germany