3

お互いに基づいて計算を行いたいファイルが2つあります。

ファイル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")

これにより、1つのテキストファイルに最小値のみが書き込まれます。すべてのmean、sd、minを1つのテキストファイルに書き込むにはどうすればよいですか？

4

3 に答える 3

6

mean、sdとが同じ長さの場合、minすべての変数を1つのデータフレームに入れてから、ファイルに書き込むことができます。

write.table(data.frame(mean,sd,min), "C:\\Users\\period.txt", sep="\t")
于 2013-03-10T11:11:39.457 に答える
5

@Didzisの回答よりも一般的な意味でappend = TRUE、への呼び出しで使用できますwrite.table。のドキュメントからwrite.table：

追加：論理。'file'が文字列の場合にのみ関係します。'TRUE'の場合、出力はファイルに追加されます。'FALSE'の場合、その名前の既存のファイルはすべて破棄されます。

したがってwrite.table、複数回呼び出して、すべての出力を1つのファイルにまとめることができます。

write.table(mean, "C:\\Users\\period.txt", sep="\t")
write.table(sd, "C:\\Users\\period.txt", sep="\t", append = TRUE)
write.table(min, "C:\\Users\\period.txt", sep="\t", append = TRUE)
于 2013-03-10T11:16:49.780 に答える
2

直接関係はありませんが、テキストファイルへの書き込みを気にしない場合は、RdataRファイル形式を使用できます。この形式では、データがバイナリでよりコンパクトに保存されますが、他のソフトウェアとは互換性がありません。

Rdataこの方法で、同じファイルに複数のオブジェクトを保存できます。

save(obj1, obj2, obj3, file="myfile.rda")

次に、別のRセッションで次のことができます。

load("myfile.rda")

また、以前に保存されたオブジェクトは、Rセッションからアクセスできます。

于 2013-03-10T12:01:31.557 に答える