如何在R中导出HTML表并控制线条边框？

发布时间：2020-12-14 21:15:37 所属栏目：资源来源：网络整理

导读：R中是否有任何函数允许导出HTML表格作为R Markdown或相关编织文档的一部分,并允许对表格边界进行详细控制？例如,想象一下这样的矩阵： x - matrix(c("","M","F","Good","23","17","Bad","4"),nrow=3,byrow=TRUE) 什么命令将输出具有以下功能的正确HTML表：

R中是否有任何函数允许导出HTML表格作为R Markdown或相关编织文档的一部分,并允许对表格边界进行详细控制？

例如,想象一下这样的矩阵：

x <- matrix(c("","M","F","Good","23","17","Bad","4"),nrow=3,byrow=TRUE)

什么命令将输出具有以下功能的正确HTML表：

--------
       M     F
---------------
 Good  23    17
---------------
 Bad   23    4
---------------

解决方法

您可以尝试我的年轻包,在名为 pander的大量开发中尝试以 pandoc markdown格式打印R对象.

懒惰的例子：

> x <- matrix(c("",byrow=TRUE)
> pandoc(x)

+------+------+------+
|      | M    | F    |
+------+------+------+
| Good | 23   | 17   |
+------+------+------+
| Bad  | 23   | 4    |
+------+------+------+

我正在研究一些函数,导致其他表语法,如“简单表”或“多行表”(参见Pandoc的自述文件).

P. S.：
您还可以使用(尚未记录的)Pandoc引用类轻松地将此表导出为HTML(除了其他格式,如docx,odt等),如：

> myReport <- Pandoc$new()
> myReport$add(x)
> myReport

Anonymous's report
==================
 written by *Anonymous* at *Sun May 27 21:04:22 2012*

  This report holds 1 block(s). 

---

+------+------+------+
|      | M    | F    |
+------+------+------+
| Good | 23   | 17   |
+------+------+------+
| Bad  | 23   | 4    |
+------+------+------+


---

Proc. time:  0.009 seconds. 

> myReport$format <- 'html'
> myReport$export()

Exported to */tmp/pander-4e9c12ff63a6.[md|html]* under 0.031 seconds.

附：第二：你也可以用brew(像sweave)一个带有Pandoc.brew的文本文件来自动转换你的<％= ...％>标签从内部R对象到Pandoc降价格式.简短的例子(当然这也适用于文件输入,现在我只是酿造一个R字符向量)：

> t <- '# Title
+ 
+ A nice matrix:
+ 
+ <%=matrix(c("",byrow=TRUE)%>
+ 
+ Bye-bye!'
> 
> Pandoc.brew(text=t)
# Title

A nice matrix:

+------+------+------+
|      | M    | F    |
+------+------+------+
| Good | 23   | 17   |
+------+------+------+
| Bad  | 23   | 4    |
+------+------+------+

Bye-bye!

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!