在 R 中为 Waffle() 函数使用字形

问题描述

我现在正在经历最糟糕的时期。我正在尝试在我的华夫饼图中使用 R 中的字形。我已经阅读了 R 和 GitHub 上的所有文档，但仍然无法弄清楚。似乎也没有执行此操作的分步指南，其中包括 FontAwesome 的安装。我什至不知道我是否应该再安装 FontAwesome、extrafont 或 emojifont。我完全迷失了方向并感到沮丧。

library(tidyverse)
library(waffle)
library(fontawesome)
library(extrafont)
library(emojifont)

gyr_colors <- c("#29cf2c","#d4d42c","#f54242")

wr_data <- c(Success = 14,Standard = 15,Bust = 50)

qb_data <- c(Success = 4,Standard = 6,Bust = 10)

rb_data <- c(Success = 15,Standard = 14,Bust = 51)

te_data <- c(Success = 5,Bust = 8)


wr <- waffle(wr_data,colors = gyr_colors,title = "WR Breakdown,2013 - 2019",xlab = "1 sq = 1 player",flip = FALSE,use_glyph="shield"
            )

wr

这是我第一次使用 R，运行后出现这个错误

错误：找不到 FontAwesome。通过以下方式安装：https://github.com/FortAwesome/Font-Awesome/tree/master/fonts

这是一个死链接。我曾尝试从 here 下载 FontAwesome，但我什至不知道在下载 zip 后如何处理它，或者这是否是我需要的 zip 文件。

我或多或少地尝试了 Google 上的所有最佳结果，似乎也找不到任何 YouTube 视频，而且他们的网站也没有帮助。我想我需要帮助安装 Fontawesome，但我不确定。任何帮助感谢感谢！

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）