用R怎么样批量处理txt文档中的平均值

3544

收藏 2017-07-12

【R新手】在工作有这样一个情况，51组数据，每组3个重复，每个重复里有6个TXT文档，每个TXT有128x128个数，要计算所有TXT的平均值，填到mean列里，并以下这样的形式输出，上传了两个文件夹作为例子，求大神帮忙解决如何用R编一段可以解决的代码

附件列表

QQ截图20170712150014.jpg

原图尺寸 9.12 KB

1.zip

大小:409.5 KB

马上下载

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

全部回复

fortune9

2017-7-13 06:22:04

对每一个文件, 例如0ROI_area.txt，你可以用以下方式得到平均值：
f<-"0ROI_area.txt"
d<-read.table(f)
dm<-mean(unlist(d))
如果要批量处理，你需要把文件夹和文件名存放到一个data.frame里面，然后用一个for循环构建文件路径（可以用file.path函数），并用上面的方法处理每个文件。

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zxcv11

2017-7-13 23:06:53

fortune9 发表于 2017-7-13 06:22
对每一个文件, 例如0ROI_area.txt，你可以用以下方式得到平均值：
f

对于单个文件用mean计算会出现
Warning message:
In mean.default(dat.roi) : argument is not numeric or logical: returning NA

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

fortune9

2017-7-14 00:37:49

zxcv11 发表于 2017-7-13 23:06
对于单个文件用mean计算会出现
Warning message:
In mean.default(dat.roi) : argument is not numeric ...

注意，对读进来的data.frame需要做unlist处理，因为mean函数不能直接对data.frame操作，用mean(unlist(dat.roi))试试

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

zxcv11

2017-7-28 19:06:31

已解决单个文件，怎么构建循环?

扫码加我拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

扫码加我 拉你入群

分享

扫码加好友，拉您进群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群

扫码加我拉你入群