如何在 flextable save_as_image 例程中顯示特殊字符

Question

Flextable 的save_as_image函數似乎只能理解 ASCII 字符。 有解決方法嗎？

最小的工作示例

library(flextable)
library(officer)
ft <- flextable(
  head(mtcars),
  col_keys = c("mpg"))
ft <- set_header_labels(ft, mpg = "n°")
ft

library(webshot)
if( require("webshot") ){
  save_as_image(x = ft, path = "./test.png")
}

預期產出

實際輸出

Answer 1

["

library(flextable)
library(officer)
ft <- flextable(
  head(mtcars),
  col_keys = c("mpg"))
ft <- set_header_labels(ft, mpg = "n\u00b0")
ft

library(webshot)
if( require("webshot") ){
  save_as_image(x = ft, path = "./test.png")
}