在ggplot2中使用windows字体的方法

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

      很多杂志在发表文章的时候要求用Helvetica、Arial或者Times New Roman的字体，而R软件做图的时候并没有提供这些字体。今天在研究这个问题的时候发现一个讨论贴很好

      使用windowsFonts这个函数就可以达到要求，如下是我自己为了画线性回归而写的一个theme:

1. library(ggplot2)
   
2. windowsFonts(HEL=windowsFont("Helvetica CE 55 Roman"),
   
3.              RMN=windowsFont("Times New Roman"),
   
4.              ARL=windowsFont("Arial"))
   
5. old_theme <- theme_update(
   
6.              plot.title=theme_text(family="ARL", size=18, face="bold", colour="black"),
   
7.              axis.title.x=theme_text(family="HEL", size=15, colour="black"),
   
8.              axis.title.y=theme_text(family="HEL", size=15, angle=90, colour="black"),
   
9.              axis.text.x=theme_text(family="RMN", size=11, colour="black"),
   
10.              axis.text.y=theme_text(family="RMN", size=11, colour="black"),
    
11.              axis.ticks=theme_segment(colour="black"),
    
12.              panel.grid.major=theme_blank(),
    
13.              panel.grid.minor=theme_blank(),
    
14.              panel.background=theme_blank(),
    
15.              axis.line=theme_segment(size=1)
    
16.              )

复制代码

     运行如上的程序，直接调用函数画图：
      运行的效果：





      我把gglot2里面的背景、框线都给去掉了，当然，上图还需要进一步的修饰，不过离要求已经很近了。折腾了半天的经验跟大家分享一下。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享1 收藏3 回帖

关键词：windows字体 ggplot2 Windows Window gplot ggplot2 windows字体

[em29][em29]

Error in grid.Call.graphics(C_text, as.graphicsAnnot(x$label), x$x, x$y,  :
  字体类别出错
我想问一下我的出现这个错误导不出图片来