如何在R中的Summary函数中插入字符串
我认为R中的summary函数可以接受字符变量,因为它指向的文件是数字文件。bbb给了我很好的结果,但aaa的总结给了我问题如何在R中的Summary函数中插入字符串,r,R,我认为R中的summary函数可以接受字符变量,因为它指向的文件是数字文件。bbb给了我很好的结果,但aaa的总结给了我问题 # Descriptives For Machine.x for (n in 1:3500){ machine_name = paste("machine.wt$Machine.", n, sep="") aaa = summary (paste("machine.wt$Machine.", n, sep="")) bbb = summary (mach
# Descriptives For Machine.x
for (n in 1:3500){
machine_name = paste("machine.wt$Machine.", n, sep="")
aaa = summary (paste("machine.wt$Machine.", n, sep=""))
bbb = summary (machine.wt$Machine.1)
}
Error in x - mx : non-numeric argument to binary operator
In addition: Warning messages:
1: In mean.default(x, na.rm = na.rm) :
argument is not numeric or logical: returning NA
2: In var(x, na.rm = na.rm) : NAs introduced by coercion
3: In mean.default(x, na.rm = na.rm, trim = trim) :
argument is not numeric or logical: returning NA
4: In var(x, na.rm = na.rm) : NAs introduced by coercion
5: In mean.default(x) : argument is not numeric or logical: returning NA
我的数据非常简单:
Obs.1 Machine.1 Obs.1 Machine.2 Obs.2 Machine.3 Obs.3 Machine.4
1 302.3 1 302.8 1 315.1 1 300.9
2 295.3 2 314.3 2 306.7 2 317.5
3 301.4 3 308.4 3 309.0 3 304.3
4 318.2 4 295.2 4 321.3 4 293.2
5 320.4 5 313.5 5 326.4 5 308.0
请参阅《财富》(312),然后再试一次
summary( machine.wt[[ paste0('Machine.',n) ]] )
使用
subset
和grepl
来避免循环怎么样
summary(subset(machine.wt,select=grepl("^Machine",names(machine.wt))))
这两个答案我都喜欢,但我想我必须接受这个答案,因为它让我的大脑弯曲。