在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原址。