「統計学関連なんでもあり」の過去ログ--- 048

No.22530　Ｒ　記事No. 22299 について、csv出力の追加　　【明石】　2018/05/04(Fri) 18:49

青木先生　様；

お忙しいところを失礼いたします，明石と申します。
昨日は，ご丁寧なご教示をいただき，誠にありがとうございました。
改めて，御礼を申し上げます。

青木先生からご教示いただいたノウハウを，読み返して整理しています。

[22299] R　ftable()関数　　　　　投稿者：明石投稿日：2017/03/11(Sat) 19:03

タイタニックのデータを題材にして，多重クロス表をftable()関数で整形出力する方法について，ご教示を頂戴しました。
大変に重宝しています。
ありがとうございました。

ftable(dat, row.vars=c("Sex", "Age", "Class"), col.vars="Alive")

                   Alive 死亡 生還
Sex  Age    Class                 
女性 子ども 1等             0    1
            2等             0   13
            3等            17   14
            乗務員          0    0
     大人   1等             4  140
            2等            13   80
            3等            89   76
            乗務員          3   20
男性 子ども 1等             0    5
            2等             0   11
            3等            35   13
            乗務員          0    0
     大人   1等           118   57
            2等           154   14
            3等           387   75
            乗務員        670  192

上記コンソール出力と同じようなレイアウトで，csv出力したいと思って調べましたが，分かりませんでした。

出力したcsvファイルをEXCELで開くとコンソールへ出力と同じようなレイアウトになることを期待してます。

ご教示を頂戴できれば，大変に助かります。
毎々，お手数をおかけいたします。
何卒どうぞよろしくお願いいたします。

No.22531　Re: Ｒ　記事No. 22299 について、csv出力の追加　　【青木繁伸】　2018/05/04(Fri) 21:43

私は，Excel がないので，LibreOffice で確認したのですが，
a = ftable(dat, row.vars=c("Sex", "Age", "Class"), col.vars="Alive")
write.table(format(a, quote=FALSE), "temp.csv", sep=",", row.names=FALSE, col.names=FALSE)
で良いと思います。

No.22532　Re: Ｒ　記事No. 22299 について、csv出力の追加　　【明石】　2018/05/05(Sat) 08:51

青木先生　様；

お忙しいところを失礼いたします，明石と申します。
今回も助けていただきました。
ありがとうございました。

出力したcsvファイルをEXCELで開いて，所望したフォーマットであることを確認しました。

本体の機能にちゃんと備わっているのですね。
これを機に，関数の引数（ふだんはデフォルト使用で意識しません）をヘルプで調べるようにします。

大変に良い勉強をさせていただきました。
ありがとうございました。