0

多分誰かが私を助けることができます。Rでさまざまな結果を計算しましたが、これらを1つのtxtにマージしようとしています。データ。しかし、どういうわけか、すべての概要を把握できる 1 つのデータファイルを作成できません。

13 行と 3 列 (ID、日付、値) を持つ「min.temp」と呼ばれる 1 つのデータフレーム

id Date      Temperature

1. 1967-04-25 -3.086980
2. 1969-04-20 -4.489397
3. 1972-04-26 -5.587154 
4. 1976-04-29 -5.684246 
5. 1976-04-30 -5.297752 
6. 1977-04-20 -3.615099 
7. 1981-04-21 -3.672259 
8. 1981-04-24 -3.860317 
9. 1991-04-20 -4.021680 
10. 1991-04-21 -6.366689 
11. 1991-04-22 -4.785906 
12. 1997-04-21 -4.989829 
13. 1997-04-22 -4.447067

および他の 2 つの値 "aver.temp" と "max.temp" は、それぞれ 1 行と 2 列のみです。

Average temperature: 10 

Maximum temperature: 25

リスト内のすべての情報をマージしようとしていましたが、それらすべてを統合しようとすると、どういうわけかリストが破壊されます。私の目標は、aver.temp と max.temp の別々の行を持ち、残りの行を続けることができる temperature.txt という txt.file を取得することです。最終的には、このようになります。

Average temperature: 10

Maximum temperature: 25

id. Date      Temperature

1. 1967-04-25 -3.086980
2. 1969-04-20 -4.489397  
3. 1972-04-26 -5.587154
4. 1976-04-29 -5.684246 
5. 1976-04-30 -5.297752 
6. 1977-04-20 -3.615099 
7. 1981-04-21 -3.672259 
8. 1981-04-24 -3.860317 
9. 1991-04-20 -4.021680 
10. 1991-04-21 -6.366689 
11. 1991-04-22 -4.785906 
12. 1997-04-21 -4.989829 
13. 1997-04-22 -4.447067

誰でも助けることができます。

4

2 に答える 2

4

ファイルに書き込むためのほとんどの関数 ( cat、write、write.tableなど) は、ファイル接続にも書き込むことができます。これは、ファイルに複数のものを書き込むためのより良い方法です。あなたの場合、次のようになります。

fh <- file("output.txt", "w")   # creates a file connection

cat("Average temperature: 10", "\n", file = fh)
cat("Maximum temperature: 25", "\n", file = fh)
write.table(min.temp, file = fh)

close(fh)   # closes the file connection

別のアプローチはappend、これらの関数のほとんどが提供するオプションを使用することです。

cat("Average temperature: 10", "\n", file = "output.txt", append = TRUE)
cat("Maximum temperature: 25", "\n", file = "output.txt", append = TRUE)
write.table(min.temp,  file = "output.txt", append = TRUE)

ただし、この 2 番目の方法は、何かを追加するたびにファイルを開いたり閉じたりするため、最初の方法ほど効率的ではありません。

于 2012-11-29T18:03:14.423 に答える
0

data.framesはリストの要素にすることができます。

FinalTextFile <- list()
FinalTextFile$DataFrame <- DF
FinalTextFile$AverageTemperature <- mean(DF$Temperature)
FinalTextFile$MaximumTemperature <- max(DF$Temperature)
于 2012-11-29T17:48:54.873 に答える