问题描述
我使用bookdownplus包的paper_zh模板同时生成PDF文档和Word文档,文中嵌入一个表格,代码如下:
library(tidyverse)
library(kableExtra)
knitr::kable(
keyword_tidy,
caption = '这是一张漂亮的表格',
format = "latex",
booktabs = TRUE,
escape = FALSE
) %>%
kable_styling() %>%
add_footnote("", notation = "none")
生成的PDF文件没有问题,可是生成的Word文档没有表格。Word中的图基本没问题,只是图下面的文字没有居中,而且显示的是Figure 1而不是图1,但是问题不大,只需要稍微调整即可。
临时解决方案
目前,我是把format = "latex"
参数改为format = "html"
,然后从生成的网页里复制粘贴到Word文档。
代码中加入条件判断?
能否根据输出的文件格式进行条件判断选择合适的代码。伪码如下:
if (output = "pdf_doucment") {
knitr::kable(...) } else {
head(iris, 10)
}
注:我也不想生成Word文档的,只是投稿以及与导师沟通需要,另外目前我的实力不足以定制出学校要求的论文的格式,从而保证我的PDF文档打印出来和别人Word文档打印出来无差异。