Как добавить звездочки значимости в пользовательскую таблицу LaTeX из R?

Question

У меня есть кадр данных формата:

PartitionA PartitionB HA HB IAB pval 
All  Kingdom 5 3 2.3 0 
All  Phylum  5 4 3.1 .09 

P-значения в последнем столбце связаны с IAB столбца. Я пытаюсь преобразовать это в таблицу LaTeX, которая выглядит следующим образом:

\begin{tabular}{ccccc} 
\hline 
Partition $A$ & Partition $B$ & $H(A)$ & $H(B)$ & $MI_{AB}$ \\ 
\hline 
All & Kingdom & 5 & 3 & 2.3^{***} \\ 
All & Phylum & 5 & 4 & 3.1 \\ 
\hline 
\end{tabular} 

Я использовал xtable раньше для создания базовых таблиц LaTeX из фреймов данных, как это. То, что я не могу понять, как делать через R, - это добавить звезды значимости в последний столбец LaTeX на основе значений p в моем кадре данных. Есть ли способ автоматически добавить эти звезды значимости с помощью R-пакета, такого как stargazer или xtable? Я не использую линейную модель для их создания, что затрудняет использование пакетов, для которых требуется объект модели. Я хотел бы иметь три уровня значимости: * для p < .05, ** для p < .01 и *** для p < .001.

Answer 1

Посмотрите на функцию symnum(). (Это то, что print.summary.lm() и другие используют). Существует пример на странице ?symnum помощь делает в значительной степени именно это

pval <- rev(sort(c(outer(1:6, 10^-(1:3))))) 
symp <- symnum(pval, corr = FALSE, 
       cutpoints = c(0, .001,.01,.05, .1, 1), 
       symbols = c("***","**","*","."," ")) 
noquote(cbind(P.val = format(pval), Signif = symp)) 

Это должно быть легко настроить все, что вы хотите.