在 R 中使用 formattable 的圖標不會出現在數據表中

Question

在使用庫格式表時，我在向上箭頭和向下箭頭圖標的可視化方面遇到了一些問題。 運行以下代碼時，基本上不會顯示箭頭。

 library(readr)
    library(dplyr)
    library(formattable)
    library(tidyverse)
    
    df1 <- data.frame(DATES = c("2020/11/20", "2020/12/20", "2021/01/20", "2021/02/20", "2021/03/20", "2021/04/20",
                                "2021/05/20", "2021/06/20", "2021/07/20", "2021/08/20", "2021/09/20", "2021/10/20",
                                "2021/11/20"),
                      UTILIZATION = round(c(0.00, 0.00, 0.00015, 0.00, 0.00, 0.00010, 0.005, 0.001, 0.00, 0.323, 0.4427, 0.00, 0.00),digits=2))
              
    df1$TREND <- sapply(1:nrow(df1),
                        function(i) {
                          if (i-12 > 0) mean(df1$UTILIZATION[i-1:2]) / mean(df1$UTILIZATION[i-3:12]) 
                          else NA_real_
                        } )
    
    
    result <- df1[13, ]
    result<-result %>% select(TREND)
    result$TREND <- result$TREND %% 1
    result
    
    
    






formattable(result, list(
     TREND = formatter(
        "span",
        style = x ~ style(color = ifelse(x < 0 , "red", "green")),
        x ~ icontext(ifelse(x < 0, "arrow-down", "arrow-up"), x)))
    )

您對如何顯示箭頭有任何建議或任何其他解決方案嗎？ 運行代碼時，除了圖標之外，所有內容都顯示正確，圖標顯示為矩形。

Answer 1

箭頭與您的代碼一起顯示。 看這里。 你的意思是別的嗎？