劉小澤寫于2020.5.18
這個需求是因為現(xiàn)實發(fā)表的圖片許多都不需要太多的粉飾螃征，簡潔明了即可
但是基礎(chǔ)包的作圖又不太友好，所以怎么把ggplot2的便利與base的簡潔結(jié)合起來呢螃壤？
上例子
library(ggplot2)
# 一個經(jīng)典的散點圖，并且?guī)Х纸M
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")
這個輸出結(jié)果還是ggplot類型的對象寄啼，因此可以輸出為ppt再進行后續(xù)編輯，可以看：
歡迎關(guān)注我們的公眾號～_～
我們是兩個農(nóng)轉(zhuǎn)生信的小碩代箭，打造生信星球墩划，想讓它成為一個不拽術(shù)語、通俗易懂的生信知識平臺嗡综。需要幫助或提出意見請后臺留言或發(fā)送郵件到jieandze1314@gmail.com
Welcome to our bioinfoplanet!
