将演绎者的列联表导出为csv或xls

时间:2011-12-20 15:35:06

标签: export-to-excel export-to-csv contingency

我正在使用JGR并使用Deducer,我正在使用Deducer创建列联表和频率。我最感兴趣的是导出这些列联表并将它们保存为.csv或xls文件。

就我的目的而言,我不需要chi-sq或类似的东西,只需要交叉标签和总数。当然,越容易越好,但任何帮助都会受到高度赞赏。

以下是通用代码和输出的内容(来自Hmisc Table Creation

   Cell Contents
|-------------------------|
|                   Count |
|             Row Percent |
|          Column Percent |
|-------------------------|

Total Observations in Table:  524 

             | asq[, 23] 
    asq[, 4] |        1  |        2  |        3  |        4  |        5  | Row Total | 
-------------|-----------|-----------|-----------|-----------|-----------|-----------|
           0 |       76  |       54  |       93  |       46  |       54  |      323  | 
             |   23.529% |   16.718% |   28.793% |   14.241% |   16.718% |   61.641% | 
             |   54.286% |   56.250% |   63.265% |   63.889% |   78.261% |           | 
-------------|-----------|-----------|-----------|-----------|-----------|-----------|
           1 |       64  |       42  |       54  |       26  |       15  |      201  | 
             |   31.841% |   20.896% |   26.866% |   12.935% |    7.463% |   38.359% | 
             |   45.714% |   43.750% |   36.735% |   36.111% |   21.739% |           | 
-------------|-----------|-----------|-----------|-----------|-----------|-----------|
Column Total |      140  |       96  |      147  |       72  |       69  |      524  | 
             |   26.718% |   18.321% |   28.053% |   13.740% |   13.168% |           | 
-------------|-----------|-----------|-----------|-----------|-----------|-----------|

谢谢!

1 个答案:

答案 0 :(得分:1)

在Deducer中没有一种特别好的方法可以做到这一点(尽管也许应该有)。如果您使用的是DeducerRichOutput,则表格格式为html,可以复制/粘贴到excel中。您可以使用以下命令安装它:

install.packages("DeducerRichOutput",,"http://r-forge.r-project.org",type="source")

如果您想以编程方式执行此操作,最好使用基本R。

xt <- xtabs(~gear+cyl,data=mtcars)
write.csv(addmargins(xt),"tmp.csv")