刘小泽写于2020.5.18
这个需求是因为现实发表的图片许多都不需要太多的粉饰，简洁明了即可
但是基础包的作图又不太友好，所以怎么把ggplot2的便利与base的简洁结合起来呢？
上例子
library(ggplot2)
# 一个经典的散点图，并且带分组
p <- ggplot(mtcars) + geom_point(aes(x = wt, y = mpg,
colour = factor(gear))) + facet_wrap(~am)
先看一下这个图
效果还行，就是看着不太简洁，ggplot2有自带简洁的模板，看看效果
p+theme_classic()
好了一点，再试试ggthemes包
library(ggthemes)
p + theme_base(base_size = 10, base_family = "Times New Roman")
这个输出结果还是ggplot类型的对象，因此可以输出为ppt再进行后续编辑，可以看：
欢迎关注我们的公众号～_～
我们是两个农转生信的小硕，打造生信星球，想让它成为一个不拽术语、通俗易懂的生信知识平台。需要帮助或提出意见请后台留言或发送邮件到jieandze1314@gmail.com
Welcome to our bioinfoplanet!
