作者：吴健 中国科学院大学 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")78finalise_plot(plot_name, source, save_filepath, width_pixels = 640, height_pixels = 450)9

plot_name参数：要把代码中哪个图片保存输出，如上例中的line。

source参数：BBC格式图表注记。

save_filepath参数：输出图片路径。

width_pixels参数：输出宽度。

height_pixels参数：输出高度。

——————————————

往期精彩：

• 19 岁少年找 Bug 赚了 100 万美元

• 你不理解苏大强的作，AI 能吗？

• 数据揭秘，在中国谁拥有私人飞机

• R语言中文社区2018年终文章整理(作者篇)

• R语言中文社区2018年终文章整理(类型篇)