时间戳

首页 > 解决方案 > 格式化 R Markdown 输出，以便可以将其复制并粘贴到 twitter

r - 格式化 R Markdown 输出，以便可以将其复制并粘贴到 twitter

问题描述

尝试使用 Rmarkdown 对 covid-19 数据进行每日报告。想要从表中发布前 10 个值，但到目前为止尝试的选项没有留下空格 - 按下推特按钮时标签会被删除。已尝试使用 html 输出的 {kableExtra} 和使用 word 输出的 {flextable}，但是当复制和粘贴时，列分隔符是“消失”的选项卡。

有没有人对如何获取列之间有空格或逗号的表有任何建议？

示例 Rmarkdown 脚本在这里，如果有兴趣，但这个问题是一般性的，不需要查看脚本。

标签： rr-markdownknitrkableextraflextable

解决方案

创建一张桌子的图片怎么样（看起来不错）。

你可以这样做：

library("knitr")
library(kableExtra")
knitr::kable(mtcars, "latex") %>%
  kableExtra::kable_styling(latex_options = "striped") %>%
  kableExtra::save_kable("test.png")

或者这有什么你不想要的缺点吗？

加法： 好的，我没有看你的文件 - 似乎你想添加 4 个表格但不复制 4 个图像。

这里有个简短的问题 - 用 twitter 的 280 字符限制，这不是很难吗......？

但你可以做的是以下几点：

```{r, echo = F}

aa <- knitr::kable(head(mtcars[, 1:4]), "pipe")
for (i in 1:length(aa)) {
   aa[i] <- gsub(" ", ",", aa[i])
   aa[i] <- paste(aa[i], "\n")
}
aa
```

在您的代码块中，将表保存到一个变量中。这将只是一个降价格式的表格。现在您可以根据需要解析、替换和更改字符。

推荐阅读