小编Rac*_*ang的帖子

我有一个非常宽的表格（300 多列），并且想通过换行来显示它。在示例中，我将仅使用 100 列。

我的想法是重复使用 kable 来显示表的子集：

library(kableExtra)
set.seed(1)
data = data.frame(matrix(rnorm(300, 10, 1), ncol = 100))

kable(data[, 1:5], 'latex', booktabs = T) 
kable(data[, 6:10], 'latex', booktabs = T) 
kable(data[, 11:15], 'latex', booktabs = T) 

但这显然很乏味......我知道有缩小比例的选项，但由于我有这么多列，这是不可能的。

我可以在 kable 中添加任何参数来实现它吗？

更新：@jay.sf 的答案似乎运行良好，但这里没有产生相同的结果。相反，我得到了一些简单的代码 - 您能否再看一下并让我知道我可以在哪里改进？谢谢！

我的是sessionInfo()：R version 3.5.1 (2018-07-02)与rmarkdown::pandoc_version().1.19.2.1

假设我有一个这样的矩阵：

set.seed(1234)
x = rnorm(10, mean=0, sd=1)
y = rnorm(10, mean=0, sd=1)
z = rnorm(10, mean=0, sd=1)
data=data.frame(rbind(x,y,z))

有什么方法可以在不指定列的情况下突出显示所有某些单元格（例如在这种情况下为 >0）？

我的预期结果是这样的（仅突出显示正值）：

例子

在实际情况下，我有大约 30 列，如果我尝试对每一列进行 column_spec 一一列，它会筋疲力尽：

data %>%
  column_spec(X1, color = "red") %>%
  column_spec(X2, color = "red")

......

谢谢！