作者:吴健 中国科学院大学 R语言、统计学爱好者,尤其擅长R语言和Arcgis在生态领域的应用分享
个人公众号:统计与编程语言
近日在google上浏览一篇文章《BBC Visual and Data Journalism cookbook for R graphics》,初看很简单,只需要安装bbplot包,然后该包只包含bbc_style()和finalise_plot()两个函数,但是在实际操作时,也遇到一些困难,接下来,把我操作该包遇到的困难和大家分享交流一下。
包的安装
该文章中包的安装摒弃传统方式,取而代之使用了pacman包中的p_load函数安装R语言所需的包,该函数的优点是可以一次性加载多个包,同时可识别未安装的包,并自动安装加载。但我安装pacman包时,提示我的R版本较低,虽然我升级到最新R版本,但同样没有安装完成,可能原因是我电脑里默认路径中含有中文,所以安装过程产生一些问题,我从pacman包的网站
https://cran.r-project.org/web/packages/pacman/index.html
下载该包压缩文件(如下图),通过R语言中安装包-从本地文件加载成功安装了pacman包,在安装本文所需的其它包时,遇到类似问题也通过上述方法解决。
PS:大家在安装R语言包遇到困难时,也可以尝试采取上述方法。
字体问题
在显示BBC风格图片时,虽然可以正常显示,但是警告信息显示“Windows字体数据库里没有这样的字体系列”,分析是我的windows电脑里没有安装BBC所需格式的字体,但是我通过查看bbc_style函数的代码,发现bbc_style函数使用的字体是"Helvetica",我给我自己电脑安装了"Helvetica"字体,但是依然没有解决问题,如果大家解决了,希望留言告知。
下面我介绍一下bbplot包中的bbc_style()和finalise_plot()两个函数。
bbc_style()函数的使用
1multiple_line <- ggplot(multiple_line_df, aes(x = year, y = lifeExp, colour = country)) +
2 geom_line(size = 1) +
3 geom_hline(yintercept = 0, size = 1, colour="#333333") +
4 scale_colour_manual(values = c("#FAAB18", "#1380A1")) +
5 bbc_style() +
6 labs(title="Living longer",
7 subtitle = "Life expectancy in China and the US")
8
可以看出bbc_style函数使用非常简单不需要任何参数,只需要把它作为一个默认ggplot2绘图主题使用即可,从bbc_style函数原代码也可以看出,bbc_style只是一个封装了默认主题的函数。
finalise_plot()函数的使用
1line <- ggplot(line_df, aes(x = year, y = lifeExp)) +
2 geom_line(colour = "#1380A1", size = 1) +
3 geom_hline(yintercept = 0, size = 1, colour="#333333") +
4 bbc_style() +
5 labs(title="Living longer",
6 subtitle = "Life expectancy in Malawi 1952-2007")
7
8finalise_plot(plot_name, source, save_filepath, width_pixels = 640, height_pixels = 450)
9
plot_name参数:要把代码中哪个图片保存输出,如上例中的line。
source参数:BBC格式图表注记。
save_filepath参数:输出图片路径。
width_pixels参数:输出宽度。
height_pixels参数:输出高度。
——————————————
往期精彩:
天善智能每日一道算法题,打卡学习小程序