删除pandoc表中的列名 - r markdown

时间:2016-05-06 11:10:11

标签: r rstudio r-markdown pandoc

是否可以删除(不显示)pandoc表中的列名?
如果我使用pander(或pandoc.table)函数,它会自动打印列名。

> pander(iris[1:4, ])

-------------------------------------------------------------------
 Sepal.Length   Sepal.Width   Petal.Length   Petal.Width   Species 
-------------- ------------- -------------- ------------- ---------
 5.1            3.5           1.4            0.2       setosa  

 4.9             3            1.4            0.2       setosa  

 4.7            3.2           1.3            0.2       setosa  

 4.6            3.1           1.5            0.2       setosa  
-------------------------------------------------------------------

预期输出应为:

-------------------------------------------------------------------
                                         
-------------- ------------- -------------- ------------- ---------
 5.1            3.5           1.4            0.2       setosa  

 4.9             3            1.4            0.2       setosa  

 4.7            3.2           1.3            0.2       setosa  

 4.6            3.1           1.5            0.2       setosa  
-------------------------------------------------------------------

4 个答案:

答案 0 :(得分:3)

我只需删除列标题即可在pander之外解决此问题:

> df <- iris[1:4, ]
> names(df) <- NULL
> pander(df)

--- --- --- --- ------
5.1 3.5 1.4 0.2 setosa

4.9  3  1.4 0.2 setosa

4.7 3.2 1.3 0.2 setosa

4.6 3.1 1.5 0.2 setosa
--- --- --- --- ------

答案 1 :(得分:1)

这样就够了吗?

pandoc.table({temp <- iris; names(temp) <- rep(" ", ncol(temp)); temp[1:4,]})

屈服。

----------------------

--- --- --- --- ------
5.1 3.5 1.4 0.2 setosa
4.9  3  1.4 0.2 setosa
4.7 3.2 1.3 0.2 setosa
4.6 3.1 1.5 0.2 setosa
----------------------

答案 2 :(得分:1)

我用NULL替换Benjamin的&amp; nbsp但是否则同意:

temp <- iris[1:4,]; names(temp) <- rep(NULL, ncol(temp)); temp[1:4,] 
pandoc.table(temp)

答案 3 :(得分:0)

像这样NULL将列名设置为names(dt) <- NULL实际上会产生错误。就我而言

Error in alloc.col(newx) : Internal error: length of names (0) is not length of dt (2)

使用带有两列的data.table

相反,我会

names(dt) <- rep(" ", ncol(dt)) pander(dt)