问无法输出pdf_book中的unicode字符(预订)
EN

Stack Overflow用户

提问于 2020-11-28 03:02:53

回答 1查看 167关注 0票数 2

我正在尝试在bookdown项目中kable呈现的表中使用复选标记unicode字符( checkmark )。MWE包含以下两个文件(index.Rmd、preamble.tex)，它们是生成的最小预订项目的一部分。

index.Rmd

    --- 
    title: "A Minimal Book Example"
    subtitle: "subtitle"
    lang: fr
    author: "Yihui Xie"
    date: "`r Sys.Date()`"
    site: bookdown::bookdown_site
    documentclass: book
    mainfont: Arial
    mathfont: Arial
    bibliography: [book.bib, packages.bib]
    biblio-style: apalike
    link-citations: yes
    subparagraph: yes
    description: "This is a minimal example of using the bookdown package to write a book. The output format for this example is bookdown::gitbook."
    ---
    
    ```{r setup, include=FALSE}
    # Set locale to french for month and day names (calendar plots)
    Sys.setlocale(locale = 'French')
    
    # Load all needed libraries
    if(!require('pacman'))install.packages('pacman')
    pacman::p_load(kableExtra)
    ```
    
    (ref:O3) O~3~
    
    # Prerequisites
    
    ✓
    
    ```{r stations-polluants, echo=FALSE}
    stations_polluants_table <- data.frame(
      stations = c("41B001", "41B004", "41B011", "41MEU1", "41N043", "41R001", "41R002", "41R012", "41WOL1", "Total / polluant"),
      O3   = c("", rep("✓", 5), "", rep("\u2713", 2), "7")
    )
    kable(stations_polluants_table, col.names = c("Station", "(ref:O3)"), booktabs = T, align = "c", caption = "Caption text") %>%
      row_spec(0, bold = T) %>%
      row_spec(10, bold = T) %>%
      collapse_rows(columns = 1, latex_hline = "major", valign = "top")
    ```
    
    
    ```{r include=FALSE}
    # automatically create a bib database for R packages
    knitr::write_bib(c(
      .packages(), 'bookdown', 'knitr', 'rmarkdown'
    ), 'packages.bib')
    ```

preamble.tex

\usepackage{booktabs}

\newfontfamily{\unicodefont}{Arial Unicode MS}
\usepackage{newunicodechar}
\newunicodechar{✓}{{\unicodefont{✓}}}

通过使用rmarkdown::render_site(output_format = 'bookdown::pdf_book', encoding = 'UTF-8')在PDF中编译，可以注意到✓在文本中正确呈现，而在生成的表中被替换。我还试图在表中使用\u2713，但没有取得更多的成功。

我做错什么了？请注意，即使首选输出是PDF，我也希望编译为gitbook (因此Rmd文件需要保持独立于输出格式)。

非常感谢。

pdf

unicode

bookdown

kable

kableextra

回答 1

Stack Overflow用户

发布于 2020-12-01 12:44:05

经过一段时间的澄清之后，解决方案只是在bookdown中使用文本引用，即(ref:check) ✓，并在表中使用该引用。

index.Rmd

    ```{r setup, include=FALSE}
    # Set locale to french for month and day names (calendar plots)
    Sys.setlocale(locale = 'French')
    
    # Load all needed libraries
    if(!require('pacman'))install.packages('pacman')
    pacman::p_load(kableExtra)
    ```
    
    (ref:O3) O~3~
    
    # Prerequisites
    
    ✓

    (ref:check) ✓
    
    ```{r stations-polluants, echo=FALSE}
    stations_polluants_table <- data.frame(
      stations = c("41B001", "41B004", "41B011", "41MEU1", "41N043", "41R001", "41R002", "41R012", "41WOL1", "Total / polluant"),
      O3   = c("", rep("(ref:check)", 5), "", rep("(ref:check)", 2), "7")
    )
    kable(stations_polluants_table, col.names = c("Station", "(ref:O3)"), booktabs = T, align = "c", caption = "Caption text") %>%
      row_spec(0, bold = T) %>%
      row_spec(10, bold = T) %>%
      collapse_rows(columns = 1, latex_hline = "major", valign = "top")
    ```
    
    
    ```{r include=FALSE}
    # automatically create a bib database for R packages
    knitr::write_bib(c(
      .packages(), 'bookdown', 'knitr', 'rmarkdown'
    ), 'packages.bib')
    ```