GT table 输出中缺少变音符号

Question

我正在使用 R 中的 GT 包为我的毕业论文创建 tables，我运行遇到了问题。文凭要用捷克语书写。

当 GT 绘制 table 时，它没有正确显示字母 ě 而是显示 e。

GT table的代码:

desc_sex[,2:ncol(desc_sex)] %>% gt(rowname_col = "sex"
  ) %>% tab_stubhead(
    label = html("Kategorie")
  ) %>% cols_align(
    align = "center",
    columns = everything()
  ) %>% cols_label(
    n = html("n"),
    procent = html("%")
  ) %>% tab_row_group(
    label = html("<b>Sledované regiony celkem"),
    rows = 7:9
  ) %>% tab_row_group(
    label = html("<b>Krajský soud v Ostravě"),
    rows = 4:6
  ) %>% tab_row_group(
    label = html("<b>Městský soud v Praze"),
    rows = 1:3
  ) %>% summary_rows(
    groups = T,
    fns = list(
      Celkem = ~sum(.)),
    formatter = fmt_number,
    decimals = 0
  )

以下是 CSV 兼容格式的数据：

"reg_reside","sex","n","procent","single"
"MSPH","Muž",93,46.5,52
"MSPH","Žena",83,41.5,34
"MSPH","Manželský pár",24,12,0
"KSOS","Muž",113,56.5,51
"KSOS","Žena",68,34,30
"KSOS","Manželský pár",19,9.5,0
"Celkem","Muž",206,51.5,103
"Celkem","Žena",151,37.8,64
"Celkem","Manželský pár",43,10.8,0

这是 GT 中的输出结果 - 错误出现在 Ostrave（应该是 Ostravě）和 Mestsky（应该是 Městský）：

Answer 1

您可以尝试使用 html 实体，例如 ě = &ecaron;

desc_sex[,2:ncol(desc_sex)] %>%
    gt(rowname_col = "sex") %>%
    tab_stubhead(label = html("Kategorie")) %>%
    cols_align(align = "center",columns = everything()) %>%
    cols_label(n = html("n"),
               procent = html("%")) %>%
    tab_row_group(label = html("<b>Sledované regiony celkem"),
                  rows = 7:9) %>%
    tab_row_group(label = html("<b>Krajský soud v Ostrav&ecaron;"),
                  rows = 4:6) %>%
    tab_row_group(label = html("<b>M&ecaron;stský soud v Praze"),
                  rows = 1:3) %>%
    summary_rows(groups = T,
                 fns = list(Celkem = ~sum(.)),
                 formatter = fmt_number,
                 decimals = 0)

GT table 输出中缺少变音符号

Missing diacritics in GT table output

formatting

r

diacritics

gt