Добавление результатов oddsratio в существующий фрейм данных

Question

Я ранее задавал этот вопрос: Как добавить результаты применения функции к существующему фрейму данных?

Я подумал, что смогу использовать это в качестве шаблона и разложить () результаты моего теста oddsratio на фрейм данных.

Вот некоторые цифры

thing<-matrix(c(33,2153,48,2528,1577,30335,66,1916,24,1162,15,910),nrow=6,byrow=T)
colnames(thing)<-c("SM","AE")
rownames(thing)<-c("a","b","c","d","e","f")
oddsratio(thing)

Я надеялся, что если я сделаю это:

oddsthing<-as.data.frame(thing)
oddsthing<-oddsthing%>%mutate(res=list(oddsratio(thing)))%>%unnest()

Но он не производит вывод, на который я надеялся.

Когда я пишу

thing_list<-oddsratio(thing)

Я вижу четыре элемента в списке: данные, мера, значение p.value, коррекция

Как получить меру и значение из списка, добавленного в виде столбцов справа от столбцов SM AE?

Как мне получить доступ к вещам в списке? Я могу unnest ($ res), но это тоже не работает.

У меня такое ощущение, что я почти на месте ...

Thnaks!

Answer 1

Как правило, вы можете использовать View(thing_list), чтобы увидеть «структуру» списка, или здесь вы можете использовать names(thing_list), которая показывает вам "data" "measure" "p.value" "correction".Как только вы узнаете, что вы можете cbind.data.frame добавить нужные столбцы к вашему фрейму данных, вот так:

thing <- cbind.data.frame(thing, thing_list$measure, thing_list$p.value)
thing
    SM    AE  estimate     lower     upper  midp.exact              fisher.exact            chi.square
a   33  2153 1.0000000        NA        NA          NA                        NA                    NA
b   48  2528 0.8084932 0.5123434 1.2605062 0.350119674 0.36987910540283064353417 0.3468330287919010879
c 1577 30335 0.2962728 0.2051051 0.4121023 0.000000000 0.00000000000000007500751 0.0000000000002497838
d   66  1916 0.4461373 0.2888623 0.6758792 0.000115398 0.00014013356896922285933 0.0001160955897881125
e   24  1162 0.7408147 0.4366285 1.2754370 0.274390974 0.26665380954122580581256 0.2689008535316412263
f   15   910 0.9244444 0.5073984 1.7659563 0.804430890 0.87366076007998338948113 0.8167701545656785855