R 未在showtext字体中加载字体\u添加\u谷歌

我正在尝试绘制一些数据，我的代码如下所示：

library('ggplot2')
library('tidyr')
library('ggthemes')
library('showtext')

font_add_google('Syncopate', 'Syncopate')
showtext_auto()

ggplot(aes(x = X, group=1), data = glassdoor)+
  geom_line(aes(y = col1, color = 'red'))+
  geom_line(aes(y = col2, color = 'blue'))+
  geom_line(aes(y = col3, color = 'magenta'))+
  geom_line(aes(y = col4, color = 'yellow'))+
  theme(text = element_text(family = "Syncopate"))+
  ggtitle('A Long Test Title')

切分音是一种独特的字体。但是我的可视化的字体看起来就像这样（这是一个测试图，忽略它的整体糟糕）：

但是如果我加载一个系统主题，比如Times New Roman，它就可以正常工作。为什么我的谷歌字体不使用showtext加载

编辑

---

Jrakru的答案是可行的，但请记住，您必须运行整个代码块：新字体将出现在保存的png文件中，但不会出现在预览窗口中。这不是对答案的轻蔑，而是针对像我这样的人，他们希望字体显示在RStudio控制台中，因此省略了代码的

ggsave

和

png

部分。

GitHub for

showtext

提到

此示例适用于大多数图形设备，包括pdf（）， png（）、postscript（）和屏幕上的设备，如windows（） Linux上的Windows和x11（）

如果你在字里行间读得很难，那就意味着

RStudioGD

图形设备不受支持。我最初几次读这本书时并没有看到这一点。我之所以知道，是因为

vignette

更为明确

注意：当前showtext不适用于内置图形 RStudio的设备，因此要尝试下面的代码，建议运行 在原始R控制台中或使用其他图形设备（如 x11（）和windows（）

看

有了上述知识，我们可以做到：

library('tidyr')
library('ggthemes')
library('showtext')

font_add_google("Schoolbell", "bell")
showtext_auto()

library('ggplot2')

df<- data.frame(x=1:10, y=101:110)

options("device" = "windows")

win.graph(10,10,12)

ggplot(data = df) +
  geom_line(aes(x,y))+
  theme(text = element_text(family = "bell"))+
  ggtitle('A Long Test Title')


ggsave("showtext-example.png", width = 7, height = 4, dpi = 96)

options("device" = "RStudioGD")

library（'tidyr'）
库（'ggthemes'）
库（'showtext'）
font\u add\u谷歌（“学铃”、“铃铛”）
showtext_auto（）
库（'ggplot2'）
df根据同一文件：

最底层，你可以读到：

与RStudio的兼容性

从版本0.9开始，showtext可以很好地与RStudio配合使用
图形设备（RStudioGD）。只需在中调用showtext_auto（）
RStudio会话，然后将正确显示绘图

在RStudio 1.3.959中它对我起了作用
在定义了fontsSee@Jrakru56之后尝试加载
ggplot2
库似乎也不起作用：（除非我误解了你的意思，你的意思是
x11
应该在选项中定义设备吗？我试过了，但似乎不起作用：（你是在MacOS上吗？如果是的话，我想你们在Ubuntu上使用
quartz
。当更改为x11No时，它对我仍然不起作用。它只是产生了我在问题中创建的相同的可视化效果：（可能值得在
showtext
github上创建一个问题。
png（）
和
ggsave（）
她不工作了吗？