1

我目前正在尝试从闪亮的应用程序生成和导出 pdf 文件。我使用 kable 生成一个表（它有效）。

当我将 kable_styling 选项添加到我的表 (kable_styling(latex_options = c("scale_down"))) 时，它无法生成我的 pdf 文件并出现此错误：错误：pandoc 文档转换失败，错误 43

注意：我检查了我的 pandoc 版本是最新的。

任何想法？非常感谢

这是我的 input.rmd

---
title: ""
output: pdf_document

---

```{r echo=T}
library(kableExtra)
library(knitr)
dt <- mtcars[1:5, 1:4]

kable(cbind(dt,dt, dt, dt, dt), "markdown") %>%
  kable_styling(latex_options = c("scale_down"))

kable(dt, format = "latex", booktabs = T, caption = "Demo Table") %>%
  add_header_above(c(" ", "Group 1" = 2, "Group 2[note]" = 2)) %>%
  add_footnote(c("table footnote"))

test3<-kable(dt, "markdown") 
  kable_styling(test3, font_size=14)
```



Tableau2
`r test3`

和闪亮的应用程序：

library(rmarkdown)
library(knitr)

shinyApp(
 ui = fluidPage(
basicPage(

  downloadButton('report'))

  ),
server = function(input, output) {
output$report = downloadHandler(
  filename = 'myreport.pdf',
  content = function(file) {
    out = render('input.Rmd', clean = TRUE, encoding='utf-8')
    file.rename(out, file) # move pdf to file for downloading
  },

  contentType = 'application/pdf'
)
 }
)
4

0 回答 0