5

同じ出力を期待して、これら 2 つのコード ブロックを実行しました

cattest <- file("cattest.txt")
cat("First thing", file = cattest)
cat("Second thing", file = cattest, append = TRUE)
close(cattest)

sink("cattest_sink.txt")
cat("First thing")
cat("Second thing")
sink()

しかし、結果cattest.txtには「2番目のもの」しか含まれていませんが、cattest_sink.txt期待したものは「最初のもの2番目のもの」が含まれています。appendファイル接続で引数が無視されるのはなぜですか?

問題が発生した場合に備えて、Windowsで64ビットR 3.0.1を使用しています。

4

2 に答える 2

5

を使用してテキストを追加する 1 つの方法catは、 mode のファイル接続を開くことですa

cattest <- file("cattest.txt")
cat("First thing", file = cattest, fill = TRUE)
close(cattest)

cattest <- file("cattest.txt", open = "a")
cat("Second thing", file = cattest)
close(cattest)
于 2013-07-18T13:28:56.787 に答える