问题描述
Blastula 似乎不尊重 <style>
和 kableextra
等表格格式包使用的 formattable
标签。
示例:
library(kableExtra)
library(blastula)
dt <- mtcars[1:5,1:6]
tbl <- dt %>%
kbl() %>%
kable_styling()
tbl
compose_email(
body = md(c(
"this is my table:",tbl
)))
打印 tbl 时显示这个
但是在打印 compose_email
我认为这是因为blastula 只是打印表格,而kableextra
格式在其他地方使用class
:
tbl <- dt %>%
kbl("html")
tbl_styled <- tbl %>%
kable_styling()
as.character(tbl)
as.character(tbl_styled)
这表明打印样式 tbl 时的唯一区别是 <table>
标记:
<table class=\"table\" style=\"margin-left: auto; margin-right: auto;\">
所以我想唯一的方法是编写我们自己的表解析器,将样式置于内联?除非已经有一个 R 包可以做到这一点?
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)