我无法添加此字体，而且我不明白是什么原因导致了我遇到的问题

Question

所以，我来找你们，是因为我不知道我在做什么

这就是我要做什么：

library(extrafont)

download.file("http://simonsoftware.se/other/xkcd.ttf",
              dest="xkcd.ttf", mode="wb")
system("mkdir ~/.fonts")
system("cp xkcd.ttf  ~/.fonts")
font_import(paths = "~/.fonts", pattern="[X/x]kcd")
fonts()
loadfonts()

除非问题是，当我进入system("mkdir ~/.fonts")时，出现以下错误：

  

/ Rtools / bin / mkdir：无法创建目录“〜/ .fonts”：没有此类文件或目录   [1] 1

我该如何停止这样做呢？我只想用某人的丑陋笔迹画一个图。