No.22393 R リストのファイル出力  【明石】 2017/06/11(Sun) 12:41

青木先生,
いつもお世話になり,ありがとうございます,明石と申します。

昨日の質問「R ファイル出力」では,大変にお世話になり,ありがとうございました。
おかげさまで,問題解決できました。

ファイル出力について,お聞きしたいことがでてきました。
ご教示をいただければ,大変に助かります。
何卒どうぞよろしくお願いいたします。

-----------

テキストマイニングの出力結果の一例です。
リスト構造の変数BOWには,文字列が代入されています。
(先頭の3要素のみ,お示しをします)
> BOW

[[1]]
[1] "わが国 景気 緩やか 拡大"

[[2]]
[1] "公共 投資 減少 傾向 輸出 増加 企業 収益 高水準 業況 感 良好 水準 推移"

[[3]]
[1] "輸出 海外 経済 拡大 背景 増加 国内 民間 需要 高水準 企業 収益 緩やか 増加"
このリストを読み取り,テキストファイルとして出力をしたいと考えています。

以下,期待する,テキストファイルの出力結果(先頭3行)です。
わが国 景気 緩やか 拡大
公共 投資 減少 傾向 輸出 増加 企業 収益 高水準 業況 感 良好 水準 推移
輸出 海外 経済 拡大 背景 増加 国内 民間 需要 高水準 企業 収益 緩やか 増加
しかしながら,私が検討しているプログラムでは以下の問題があります。

リストの要素ごとに,テキストファイルでは改行したいのですが(ここでは3行),
1行になってしまい,苦慮しています。
改行コードの挿入方法,ファイルのappend等の知識が不足していることが原因だと思われます。

また,BOWの要素数でループを回していますが,apply関数を使うスマートな方法を知りたいと思います。

以上,ご教示をいただければ,大変に助かります。
何卒どうぞよろしくお願いいたします。

No.22394 Re: R リストのファイル出力  【青木繁伸】 2017/06/11(Sun) 20:59

invisible(lapply(BOW, cat, "\n", file="test", append=TRUE))

No.22395 【御礼】 Re: R リストのファイル出力  【明石】 2017/06/12(Mon) 09:02

青木先生,
いつもお世話になり,ありがとうございます,明石と申します。

ご教示をいただき,ありがとうございます。

listでapply関数を使う方法を,勉強させていただきました。

ありがとうございました。

● 「統計学関連なんでもあり」の過去ログ--- 048 の目次へジャンプ
● 「統計学関連なんでもあり」の目次へジャンプ
● 直前のページへ戻る