如何防止knitr打印##和矩阵索引/行号？

Question

假设我有一个矩阵，其中有一个 id 列，每行不增加 1。

m <- matrix(c(1, "a", "c", 
              5, "g", "c", 
              4, "b", "c", 
              9, "g", "a"),
     ncol=3, byrow=TRUE)
colnames(m) <- c("id", "class", "type")

我尝试用rownames(m) <- NULL 或rownames(m) <- c() 重命名行，但我总是得到一个在最左边有行号的输出：

     id  class type
[1,] "1" "a"   "c" 
[2,] "5" "g"   "c" 
[3,] "4" "b"   "c" 
[4,] "9" "g"   "a" 

此外，如果我在 knitr 中打印为 PDF，我会得到 ## 运行在一边：

##      id  class type
## [1,] "1" "a"   "c" 
## [2,] "5" "g"   "c" 
## [3,] "4" "b"   "c" 
## [4,] "9" "g"   "a" 

我想打印一个仅包含我输入到矩阵中的数据的 pdf：

id  class type
"1" "a"   "c" 
"5" "g"   "c" 
"4" "b"   "c" 
"9" "g"   "a" 

Answer 1

您可以使用knitr 包中的kable。

m <- matrix(
  c(1, "a", "c", 5, "g", "c", 4, "b", "c", 9, "g", "a"),
  ncol=3,
  byrow=TRUE
)

colnames(m) <- c("id", "class", "type")

knitr::kable(m)

# |id |class |type |
# |:--|:-----|:----|
# |1  |a     |c    |
# |5  |g     |c    |
# |4  |b     |c    |
# |9  |g     |a    |

您还可以阅读优秀的kableExtra 包here，它会为您提供一些很棒的格式选项。

注意我最初的回答包括转换为数据框，这仍然是我创建表时的常用工作流程。然而正如所指出的，kable 会很乐意接受一个矩阵作为输入。