我正在尝试从多个操作的输出中创建数据集。但我不知道如何自动化这个过程。复制函数很好用,但是需要执行多个操作来获得单个新数据点,例如调整后的R平方和F统计量。
R 代码:
#make dataframe with random data
A<-as.integer(round(runif(20, min=1, max=10)))
dim(A) <- c(10,2)
A<-as.data.frame(A)
#extract F-statistic
summary(lm(formula=V1~V2,data=A))$fstatistic[1]
#extract adjusted R squared
summary(lm(formula=V1~V2,data=A))$adj.r.squared
#repeat 100 times and make a dataframe of the unique extracted output, e.g. 2 columns 100 rows
??????????????
replicate
函数可以很好地工作。只需将两个摘要输出用c()
包装起来即可。replicate(100, { 我想做的事情; c(summary(lm(formula=V1~V2,data=A))$fstatistic[1], summary(lm(formula=V1~V2,data=A))$adj.r.squared)})
- jbaums