用ggplot画图如何修改中文字体

快用showtext包，具体可参考

https://github.com/yixuan/showtext

http://yixuan.cos.name/cn/2015/04/showtext-new-version/

http://www.tuicool.com/articles/uINryu6

以下内容已作古，非考古人士不建议翻看XD

   
#画图时想把文本字体换成微软雅黑，怎么搞？

#首先，需要下载安装导入extrafont包
install.packages("extrafont")
library(extrafont)

#然后，找到字体文件位置， "C:\Windows\Fonts\微软雅黑"
#右键名为"微软雅黑 常规"的文件，选择属性，看到第一行有 "msyh" 即为字体名

#导入字体，目前只支持导入TrueType类型字体
font_import(pattern="msyh")

#查看导入的字体，如果字体导入成功，返回应为 "Microsoft YaHei"，即在R中微软雅黑字体的名字
fonts()

#注册字体
loadfonts(device="win")，

#假设g为要修改的ggplot对象，在ggplot2中通过修改element_text()元素来修改字体
g=g+theme(text = element_text(family="Microsoft YaHei"))

#不出意外，图像中所有文本的字体变为微软雅黑，要修改其他字体也可依葫芦画瓢

#参考
#http://www.r-bloggers.com/change-fonts-in-ggplot2-and-create-xkcd-style-graphs/