R语言—统计结果输出至本地文件方法总结

OStack程序员社区-中国程序员成长平台 › 门户 › 编程› R语言›R语言教程

原作者: [db:作者] 来自: [db:来源] 收藏邀请

1.sink()
在代码开始前加一行：sink(“output.txt”)，就会自动把结果全部输出到工作文件夹下的output.txt文本文档。这时在R控制台的输出窗口中是看不到输出结果的。代码结束时用sink()切换回来。

示例：

sink("a.txt") 
x<-rnorm(100,0,1) 
mean(x) 
sink()

注：此处输出为mean(x)。

2.stargazer()

library(stargazer)

#导入数据
mydata <- read.csv("intro_auto.csv")
attach(mydata)
Y <- cbind(mpg)
X1 <- cbind(weight)
X2 <- cbind(weight,price,foreign)

#生成描述统计表格
stargazer(mydata, type = "text")

#简单的OLS回归，获得估计结果fit1和fit2
fit1 <- lm(Y~weight) 
fit2 <- lm(Y~weight+price+foreign)

#生成估计结果表格
stargazer(fit1, fit2, title = "results", align = F, type = "text", no.space = TRUE, out = "fit.html")
#需要注意的是，此命令中，在consol中生成的表格是text格式的，而导出的表格是html格式的（stargazer不能直接生成word文件），再用word打开fit.html文件就可以

3.xlsReadWrite包中的write.xls函数
尚未使用过。

4.R2wd包
---------------------
作者：Imliao
来源：CSDN
原文：https://blog.csdn.net/imliao/article/details/79367602

示例：

sink("a.txt") 
x<-rnorm(100,0,1) 
mean(x) 
sink()

注：此处输出为mean(x)。

2.stargazer()

library(stargazer)

#导入数据
mydata <- read.csv("intro_auto.csv")
attach(mydata)
Y <- cbind(mpg)
X1 <- cbind(weight)
X2 <- cbind(weight,price,foreign)

#生成描述统计表格
stargazer(mydata, type = "text")

#简单的OLS回归，获得估计结果fit1和fit2
fit1 <- lm(Y~weight) 
fit2 <- lm(Y~weight+price+foreign)

#生成估计结果表格
stargazer(fit1, fit2, title = "results", align = F, type = "text", no.space = TRUE, out = "fit.html")
#需要注意的是，此命令中，在consol中生成的表格是text格式的，而导出的表格是html格式的（stargazer不能直接生成word文件），再用word打开fit.html文件就可以