ggsci是R中的一個包,提供了一系列顏色給ggplot2調(diào)色素跺。里面包括了一些知名雜志期刊或者軟件(甚至是知名科幻電影二蓝、動畫等)的經(jīng)典配色風格,對于科研繪圖是相當有幫助的指厌。下邊介紹一下這個包的用法和內(nèi)容刊愚,如果想要自己查看說明,可以在R中輸入
vignette("ggsci")
來快速查閱踩验。
首先可以通過以下兩種方式下載ggsci:
# download ggsci package
install.packages("ggsci")
#install.packages("devtools")
devtools::install_github("nanxstats/ggsci")
下載下來后鸥诽,可以用diamonds數(shù)據(jù)集來看配色效果:
library(ggsci)
library(ggplot2)
library(gridExtra)
data('diamonds')
diamonds數(shù)據(jù)集的內(nèi)容主要是:
image
由于原數(shù)據(jù)太大,將對數(shù)據(jù)進行一些篩選再進行作圖箕憾,先用ggplot做出點圖(scatter plot)和箱型圖(boxplot):
# 散點圖
p1 = ggplot(subset(diamonds, carat > 2.2),aes(x = table, y = price, colour = cut)) + geom_point(alpha = 0.7) + geom_smooth(method = "loess", alpha = 0.05, size = 1, span = 1) + theme_bw()
p1
# 箱線圖
p2 = ggplot(subset(diamonds, carat > 2.2), aes(x = color, y = price, fill = color)) + geom_boxplot(color = 'black') + theme_bw()
p2
散點圖:
image
箱線圖:
image
下面根據(jù)ggsci中的scale_color_xx或者scale_fill_xx(xx為雜志或者軟件的名字)配色牡借。
新英格蘭雜志(NEJM):
p1_nejm = p1 + scale_color_nejm()
image
柳葉刀(Lancet):
p1_lancet = p1 + scale_color_lancet()
image
基因組可視化軟件IGV:
p1_igv = p1 + scale_color_igv()
image
知名動畫瑞克和莫蒂:
p1_rick = p1 + scale_color_rickandmorty()
image
科幻電影創(chuàng)戰(zhàn)紀(Tron: Legacy):
p1_tron = p1 + theme_dark() + scale_color_tron()
image
還有一些別的配色沒有展示,感興趣可以自己查閱探索~