R 中是否有任何函数允许将 HTML 表作为 R Markdown 或相关编织文档的一部分导出并允许对表线边框进行详细控制?
例如,想象一个这样的矩阵:
x <- matrix(c("", "M", "F", "Good",
"23", "17", "Bad", "23", "4"), nrow=3, byrow=TRUE)
什么命令会输出具有以下功能的正确 HTML 表格:
--------
M F
---------------
Good 23 17
---------------
Bad 23 4
---------------
最佳答案
您可以在名为 pander 的繁重开发中尝试我的非常年轻的包。它试图在 pandoc 中打印 R 对象 Markdown 格式。
懒惰的例子:
> x <- matrix(c("", "M", "F", "Good", "23", "17", "Bad", "23", "4"), nrow=3, byrow=TRUE)
> pandoc(x)
+------+------+------+
| | M | F |
+------+------+------+
| Good | 23 | 17 |
+------+------+------+
| Bad | 23 | 4 |
+------+------+------+
我只是在处理一些导致其他表语法的函数,如“简单表”或“多行表”(参见 Pandoc 的自述文件)。
PS:
您还可以使用(尚未记录)
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 Markdown 格式的标签。简短示例(当然这也适用于文件输入,现在我只是 brew
一个 R 字符向量):> t <- '# Title
+
+ A nice matrix:
+
+ <%=matrix(c("", "M", "F", "Good", "23", "17", "Bad", "23", "4"), nrow=3, byrow=TRUE)%>
+
+ Bye-bye!'
>
> Pandoc.brew(text=t)
# Title
A nice matrix:
+------+------+------+
| | M | F |
+------+------+------+
| Good | 23 | 17 |
+------+------+------+
| Bad | 23 | 4 |
+------+------+------+
Bye-bye!
关于r - 如何在 R 中导出 HTML 表格并控制线条边框?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/10774285/