Экспорт таблиц сопряженности дедуцера в формате csv или xls - PullRequest
Новая
       36

Экспорт таблиц сопряженности дедуцера в формате csv или xls

0 голосов
/ 20 декабря 2011

Я работаю с 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 Ответ

1 голос
/ 20 декабря 2011

В 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")
...