重回帰職人の朝は早い
•Download as KEY, PDF•
14 likes•3,085 views
The document describes the memisc R package which contains functions for creating publication-ready regression tables. It shows how to use the mtable function to generate a regression table from linear models and export it to an Excel spreadsheet. Additionally, it demonstrates how to write the iris dataset directly to a worksheet and a subset of iris to another location in the same worksheet.
![book <- loadWorkbook("test.xlsx", create = TRUE)
book["iris"] <- iris
#
book["iris2", startRow = 6, startCol = 11,
header = FALSE] <- iris
#
saveWorkbook(book)
book["iris"]
book["iris2", header=FALSE]
#](https://image.slidesharecdn.com/random-111126013722-phpapp01/85/-63-320.jpg)
重回帰職人の朝は早い
- 39. ... (almost) publication-ready tables of regression model estimates. ... (memisc package description)
- 56. # mtable options("factor.style"="($f): ($l)") # ($f) $l) options("baselevel.sep"="-") # options("float.style"="f") # formatC format
- 60. library(XLConnect) book <- loadWorkbook("test.xlsx", create = TRUE) # createSheet(book, "test") # writeWorksheet(book, iris, sheet='test', startrow=0, startcol=0, header=TRUE) # saveWorkbook(book) #
- 62. m1 <- mtable(lm0, lm1, coef.style="default", summary.stats=c("adj. R-squared", "AIC", "BIC","N")) con <- textConnection(format(m1)) m1.df <- read.table(con, sep="t") close(con) book <- loadWorkbook("test.xlsx", create = TRUE) createSheet(book, "mtable") writeWorksheet(book, m1.df, sheet='mtable', header=FALSE) saveWorkbook(book)
- 63. book <- loadWorkbook("test.xlsx", create = TRUE) book["iris"] <- iris # book["iris2", startRow = 6, startCol = 11, header = FALSE] <- iris # saveWorkbook(book) book["iris"] book["iris2", header=FALSE] #
Editor's Notes
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n
- \n