GT 表输出中缺少变音符号

Question

我正在使用 R 中的 GT 包为我的文凭论文创建表格，但遇到了问题。文凭要用捷克语书写。

当 GT 绘制表格时，它不能正确显示字母 ě，而是显示 e。

GT 表的代码：

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

您可以尝试使用 ie ě = ě 等 html 实体

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)