如何向 R 中的自定义 LaTeX table 添加意义之星?

How do I add significance stars to a custom LaTeX table from R?

我有一个格式的数据框:

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

最后一列中的 p 值与列 IAB 相关联。我正在尝试将其转换为如下所示的 LaTeX table:

\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 tables。我不知道如何通过 R 做的事情是根据我的数据框中的 p 值向最后一个 LaTeX 列添加重要的星星。有没有办法使用像 stargazer 或 xtable 这样的 R 包自动添加这些重要的星星?我不使用线性模型来生成它们,这使得很难使用需要模型对象的包。我想要三个显着性水平:* 代表 p < .05,** 代表 p < .01,*** 代表 p < .001。

查看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))

根据您的喜好进行定制应该很容易。