我有两个文件,我想根据彼此进行一些计算。
文件 1:
conne <- file("C:\\bias.bin","rb")
cor<- readBin(conne, numeric(), size=4, n=1440*720, signed=TRUE)
文件 2:
conne2 <- file("C:\\me1440s.bin","rb")
bioms<- readBin(conne2, integer(), size=1, n=1440*720, signed=F)
计算:
mean=tapply(cor, bioms, mean, na.rm=TRUE)
sd=tapply(cor, bioms, sd, na.rm=TRUE)
min=tapply(cor, bioms, min, na.rm=TRUE)
写入文本文件:
write.table(min, "C:\\Users\\period.txt", sep="\t")
这只会将 min 写入一个文本文件。如何将所有 mean、sd 和 min 写入一个文本文件?