R 有没有办法用图标重命名列名

发布于02月23日

有没有办法通过重命名将图标添加到列标题中.我试过下面的

datatable((iris %>% rename(paste0('Sepal.Width',as.character(icon(name = "info-circle", lib = "font-awesome"))) = Sepal.Width)))

所以我需要一个小图标旁边的萼片.宽度，如上所述.但我没有得到任何结果.有人能帮我吗？

推荐答案

您可以使用gt软件包(它接受html代码作为列名)和icons软件包(它提供正确的html代码):

library(tidyverse)
library(gt)

iris %>% 
  head() %>% 
  gt() %>% 
  cols_label(
    Sepal.Width = html(as.character(icons::fontawesome("info-circle")))
  )

^{由reprex package(v2.0.1)于2022年2月23日创建}

这会将图标显示为列名，但不显示数据中的列名.框架没有改变.考虑到你的例子中使用了DT::datatable，我假设这就是你真正想要的.

否则，您可以使用:

colnames(iris) <- c("Sepal.Length",
                    as.character(icons::fontawesome("info-circle")), 
                    "Petal.Length", 
                    "Petal.Width", 
                    "Species")

但显示实际图标而不是底层html代码要复杂得多.