Как совместить рубрики на звездочете?

Хочу составить стол со звездочётом. Сначала я присвоил результат моей формулы rAgg. После этого я хочу составить таблицу звездочета с помощью следующих команд:

a <- rAgg$ors.ctx
b <- rAgg$ors.indiv
c <-rAgg$lik
rbind(a,b,c)

Примеры результатов a: OR l95 u95 (Intercept) 0.007148468 0.006327645 0.008075768 statusscore14 0.996612498 0.971742666 1.022118825 meanGroente 1.068326524 1.046027113 1.091101319

Это дает результат:

> rbind(a,b,c)
#                        OR          l95          u95
# (Intercept)   7.148468e-03 6.327645e-03 8.075768e-03
# statusscore14 9.966125e-01 9.717427e-01 1.022119e+00
# meanGroente   1.068327e+00 1.046027e+00 1.091101e+00
# pHerkomst     4.682304e-01 3.552017e-01 6.172260e-01
# pOuderPersoon 2.969725e+00 2.509198e+00 3.514775e+00
# c             4.686703e+03 4.686703e+03 4.686703e+03

Однако я бы предпочел такой результат

                        rAgg      
(Intercept)   7.148468e-03 (6.327, 8.075)
statusscore14 9.966125e-01 (9.717, 1.022)
meanGroente   1.068327e+00 (1.046, 1.091)
pHerkomst     4.682304e-01 (3.552, 6.172)
pOuderPersoon 2.969725e+00 (2.509, 3.514)
c             4.686703e+03 (4.6867, 4.686)`

Другими словами, объедините три столбца в один (и используйте скобки). Надеюсь, есть удобный способ сделать это.

Помощь очень ценится!


r stargazer
person Keizer    schedule 02.06.2016    source источник
comment
вы можете использовать функцию unite в библиотеке tidyr   -  person ArunK    schedule 02.06.2016

Ответы (1)


arrow_upward
1
arrow_downward

В основном @rawr уже дал ответ. В его комментарии отсутствовал только a. Таким образом, полный ответ будет sprintf("%f (%.3f and %.3f)", a, b, c). PS: Я избегаю именования объектов, таких как функции (а c - это функция).

person Qaswed    schedule 02.06.2016
comment
Спасибо. Однако я получил сообщение об ошибке: Error in sprintf("%f (%.3f and %.3f)", a, b, c) : arguments cannot be recycled to the same length. Я тестировал, и это потому, что комбинация a и b. У обоих одинаковые столбцы, только одна дополнительная строка. Почему появляется это сообщение об ошибке? (ps. Я добавил в вопрос макет a. И вы правы насчет именования объектов как функций. Сразу изменили. - person Keizer; 02.06.2016
comment
Если a имеет лишнюю строку, одну строку нужно отбросить в a (или добавить в b (и, возможно, также в c)). Скажем, строку 8 следует отбросить, используйте sprintf("%f (%.3f and %.3f)", a[-8], b, c). - person Qaswed; 02.06.2016