在ggplot2中作一幅怀旧的图

在Github上找到个叫Rokemon的包,给ggplot提供了gameboy、gameboy advance和pokemon相关的几个主题,可以作pokemon风格的bar图和pie图,还提供有一些pokemon的数据,挺有趣。

ggplot2的gameboy风格散点图(演示数据:diamonds)

pokemon血条风格的bar图(演示数据:diamonds)

这个包目前还是早期开发阶段,可以使用devtools从github安装。

默认已经安装ggplot2了。

install.packages("devtools")

devtools::install_github("schochastics/Rokemon")

第一次加载Rokemon的时候会提示导入字体,并告诉你输入什么指令安装字体

Rokemon::import_pokefont()

但是我第一次尝试作图的时候报错Windows字体数据库没有字体系列。于是按照官方说明先安装了extrafont包,运行字体导入指令

install.packages("extrafont")

extrafont::font_import()

漫长的等待之后(所有的windows字体都复制到R的library里了,我想肯定有更简单的办法……),再作图就OK了。

上面的散点图:

library(tidyverse)

library(Rokemon)

ggplot(diamonds,aes(carat,price))+geom_point(shape=15,col="#006400",size=2)+theme_gameboy()

上面的bar图:

diamonds %>% group_by(color) %>% summarise(price=mean(price)) %>% gghealth("color","price",init.size=7)

包里还有Pokemon的Pie图、Pokemon Go的主题和Pokemon的配色,参见Github原址

Leave a Reply

Your email address will not be published. Required fields are marked *