Formattable在呈现特殊字体字符时遇到问题

如何解决Formattable在呈现特殊字体字符时遇到问题

我正在尝试建立一个包含两列的格式表，一列是指标类别，另一列是趋势指标。对于趋势，我想使用各种方向箭头，它们使用加载的字体集中的扩展字符。可以使用“＆＃xnnnn;”进行引用。符号。

但是，每当我为趋势指定特定的格式化程序时，转换都会失败，并且不会显示箭头字符（字符串表示为！）。

在下面的代码中，第一个打印有效（使用textout1）；第二个失败。

library(formattable)

metric <- "Quality"
trend <- "&#x2191"

thetext <- data.frame("Metric" = metric,"Trend" = trend)

f1 <- formattable::formatter("span",style = ~ style(color = "#0066CC","font-family" = "Cambria"))
f2 <- formattable::formatter("span",style = ~ style(color = "#00FF00","font-family" = "Cambria",font.weight = "bold"))
        
textout1 <- formattable::formattable(thetext,align = c("l","l"),list("Metric" = f1))
textout2 <- formattable::formattable(thetext,list("Metric" = f1,"Trend" = f2))

print (formattable(textout1))
print (formattable(textout2))