在R中时，如何插入特殊字符作为case_的结果？

我在R中输入了以下代码：

case_when(tesdata$note <= 10 ~ "&#8804",
tesdata$note > 10 ~ "&#8805")

它应该会回来≤ 如果该值小于或等于10≥ 如果该值大于10。 但是，它不会给我特殊字符，而是返回代码本身&8804。

---

如何使其返回特殊字符？

您可以使用等效的unicode

testdata %>% 
  mutate(
    newcolumn = case_when(
      note <= 10 ~ "\u2264",  # ≤
      note > 10  ~ "\u2265",  # ≥
      TRUE       ~ "\u2245"   # ≅
    )
  )