解决R语言在安装包时候报错‘Unable to move temporary installation’

事情是这样的：今天在使用Y叔推荐的ggThemeAssist包时候，发现调整字体时候报错了

library(ggplot2)
data(mtcars)
gplot(mtcars, aes(x = hp , y = mpg,color = cyl)) + geom_point() -> gg
library(ggThemeAssist)
ggThemeAssistGadget(gg)
## Windows字体数据库里没有这样的字体系列

130309.png

于是查询发现安装Cairo包即可

install.packages('Cairo'）
## 但是报错了

eqwee.png

然后谷歌查找了一下答案，发现万能的谷歌，我们遇到的问题别人基本也遇到过
solution ways

## 在R中输入以下命令
trace(utils:::unpackPkgZip, edit=TRUE)
##然后将第142行的Sys.sleep(0.5) 改为 Sys.sleep(2.5)
## 然后很神奇就能安装了。

eqwe.png

So amazing