Bell MT шрифты в ggplot и MacOS

Question

Я использую на своем Mac Machine фрагмент кода R, который предназначен для построения точечной диаграммы.

Мне кажется, что я понял, в чем проблема, но я не знаю решения.Вот фрагмент кода, который я использую:

library(extrafont)
extrafont::loadfonts(device="win")
font_import() # import all your fonts
fonts() #get a list of fonts
fonttable()

ggplot(aggregate(cbind(Tax_Burden,debt_GDP) ~ cou, data=df, mean, na.rm=TRUE), aes(x=log(debt_GDP), y=log(Tax_Burden))) + 
  geom_point(aes(color = Tax_Burden, size=debt_GDP))+  
  labs(color = "Tax Burden\n[% Total Revenues]", size = "Public Debt [% GDP]")+
  geom_smooth(method=lm, se=FALSE, linetype="dashed")+
  geom_text_repel(aes(label = cou), size = 2)+
  ylab("Log of Tax Burden") +
  xlab("Log of Public Debt [% GDP]") +
  theme_minimal() +
      theme(text =element_text(family="Bell MT"),
            legend.background = element_blank(),
            legend.key   = element_blank(),
            legend.text  = element_text(size = 8),
            axis.title.x = element_text(size = 8), 
            axis.title.y = element_text(size = 8))

Насколько я понял, вся проблема заключается в использовании Bell MT шрифтов.

Например, ошибка, которую я получаю, такова:

Error in grid.Call(C_textBounds, as.graphicsAnnot(x$label), x$x, x$y,  : 
  polygon edge not found
In addition: There were 50 or more warnings (use warnings() to see the first 50)

с первым предупреждением:

1: In grid.Call(C_textBounds, as.graphicsAnnot(x$label),  ... :
  no font could be found for family "Bell MT"

Эта ошибка удаляется, когда я сбрасываю Bell MT шрифты и используйте опцию по умолчанию.

Может кто-нибудь предложить решение?

Большое спасибо