R语言ggplot2()配色——ggsci()包介绍及使用

Scientific Journal and Sci-Fi Themed Color Palettes for ggplot2ggsci包含期刊或软件的经典配色，对科研绘图很有帮助。#下载包ggplot2和ggsciinstall.packages(ggplot2)install.packages(ggsci)#加载包library(ggplot2)library(ggsci)NameScales

文章共954字 · 阅读需要大约4分钟

一键AI生成摘要，助你高效阅读

问答

Friday～

27322人浏览 · 2021-03-11 15:20:09

Friday～ · 2021-03-11 15:20:09 发布

Scientific Journal and Sci-Fi Themed Color Palettes for ggplot2

ggsci包含期刊或软件的经典配色，对科研绘图很有帮助。

#下载包ggplot2和ggsci
install.packages(ggplot2)
install.packages(ggsci)

#加载包
library(ggplot2)
library(ggsci)

Name	Scales	Palette Types	Palette Generator
NPG	`scale_color_npg();` `scale_fill_npg()`	`"nrc"`	`pal_npg()`
AAAS	`scale_color_aaas()` `scale_fill_aaas()`	`"default"`	`pal_aaas()`
NEJM	`scale_color_nejm()` `scale_fill_nejm()`	`"default"`	`pal_nejm()`
Lancet	`scale_color_lancet()` `scale_fill_lancet()`	`"lanonc"`	`pal_lancet()`
JAMA	`scale_color_jama()` `scale_fill_jama()`	`"default"`	`pal_jama()`
JCO	`scale_color_jco()` `scale_fill_jco()`	`"default"`	`pal_jco()`
UCSCGB	`scale_color_ucscgb()` `scale_fill_ucscgb()`	`"default"`	`pal_ucscgb()`
D3	`scale_color_d3()` `scale_fill_d3()`	`"category10"` `"category20"` `"category20b"` `"category20c"`	`pal_d3()`
LocusZoom	`scale_color_locuszoom()` `scale_fill_locuszoom()`	`"default"`	`pal_locuszoom()`
IGV	`scale_color_igv()` `scale_fill_igv()`	`"default"` `"alternating"`	`pal_igv()`
UChicago	`scale_color_uchicago()` `scale_fill_uchicago()`	`"default"` `"light"` `"dark"`	`pal_uchicago()`
Star Trek	`scale_color_startrek()` `scale_fill_startrek()`	`"uniform"`	`pal_startrek()`
Tron Legacy	`scale_color_tron()` `scale_fill_tron()`	`"legacy"`	`pal_tron()`
Futurama	`scale_color_futurama()` `scale_fill_futurama()`	`"planetexpress"`	`pal_futurama()`
Rick and Morty	`scale_color_rickandmorty()` `scale_fill_rickandmorty()`	`"schwifty"`	`pal_rickandmorty()`
The Simpsons	`scale_color_simpsons()` `scale_fill_simpsons()`	`"springfield"`	`pal_simpsons()`
GSEA	`scale_color_gsea()` `scale_fill_gsea()`	`"default"`	`pal_gsea()`
Material Design	`scale_color_material()` `scale_fill_material()`	`"red"` `"pink"` `"purple"` `"deep-purple"` `"indigo"` `"blue"` `"light-blue"` `"cyan"` `"teal"` `"green"` `"light-green"` `"lime"` `"yellow"` `"amber"` `"orange"` `"deep-orange"` `"brown"` `"grey"` `"blue-grey"`	`pal_material()`

ggsci详细配色方案，含颜色代码：

#显示配色方案，以npg为例
install.packages("scales")
library("scales")
pal= pal_npg("nrc")(10)
show_col(pal)

#载入数据并制图
data("diamonds")
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()
p2 = ggplot(subset(diamonds, carat > 2.2 & depth > 55 & depth < 70),
       aes(x = depth, fill = cut)) +
  geom_histogram(colour = "black", binwidth = 1, position = "dodge") +
  theme_bw()
grid.arrange(p1, p2, ncol = 2)

#ggsci()包的使用
#颜色设置如点、线图，ggplot()+scale_color_palname()
p1_npg = p1 + scale_color_npg()
#填充颜色如条、柱形图，ggplot()+scale_fill_palname()
p2_npg = p2 + scale_fill_npg()
grid.arrange(p1_npg, p2_npg, ncol = 2)