R语言导出分析结果

结果输出，最主要的是数据集输出和表格输出两类

数据集输出

数据集读取和输出，用spss格式读入，stata格式输出，实在是太方便了：

library("foreign")
datain <- read.spss(file="F:/DATA/data.sav")
write.dta(datain, file="F:/DATA/finaldata.dta")

表格输出

表格输出，最有爱的就是使用xtable啦！

library("xtable")
xtable <- xtable(outbox,caption="title")

print(xtable, type = "html")
#output into html, usually used in Rmd.
#and if you use R Markdown, you should make sure the option "results='asis'" is set.

print(xtable)
#output into latex style. 
#and if you use R Sweave, you should make sure the option "results=tex" is set.

今天新见到一个使用stargazer包的方法，确实很方便，但目前只支持Latex输出。

<<results=tex>>=
library(stargazer)
stargazer(attitude)
#output basic statistics.

stargazer(linear.1, linear.2, probit.model, title="Regression Results", align=TRUE)
#compare sever models in one table.
#It's really awesome!
@

实际上，我的博客现在也支持Latex语言了，信不信？我输出一段儿Latex给各位看一下，哈哈。
————没成功！！！只能支持公式，不支持表格！！！

图片输出

图片输出，在Rmd中，应设置fig.show=’asis’；在Rnw中，应设置fig=TRUE。

万能的例外情况

当然，很多情况下，也会遇到xtable不识别的情况，特别是复杂建模使用不常见的程序之时。那怎么办呢？capture.output可以直接输出屏显内容，真正的所见即所得：

capture.output(..., file = NULL, append = FALSE)
capture.output(summary(modelfit), file = "F:/DATA/output.txt" )

原文链接：http://www.anaharb.com/2014/0216/R-outcome-export/