paletteer包：拥有2100多个调色板！
The following article is from R语言统计与绘图 Author 段湘杰
简介
ggplot2是目前主流的绘图R包，有着丰富的扩展包。今天来推荐一个极其强大的配色R包——paletteer包。据R包作者介绍，这个包收集了52个R包的2100种调色板，R用户可以通过paletteer[1]包来直接调用其他R包的调色板。下面来学习下怎么使用这个R包[2]。
1. 安装和加载R包
安装可以直接从CRAN上安装。
install.packages("paletteer")
library(paletteer)
2. 探索paletteer包
在使用paletteer包绘制图形前先看看paletteer包的调色板情况。
2.1 离散型调色板
palettes_d_name是一个包含了R包和离散型调色板的数据集。
d_palettes <- palettes_d_names
d_palettes
可以看到数据集共有1788行，包含4个变量，分别表示R包、调色板、调色板中的颜色数量、调色板类型等。
2.2 连续型调色板
palettes_c_name是一个包含了R包和连续型调色板的数据集。
c_palettes <- palettes_c_names
c_palettes
可以看到数据集共有315行，包含3个变量，分别表示R包、调色板、调色板类型等。
3. paletteer包的用法
3.1 主要函数
paletteer包使用起来很简单，包中有4个主要的函数。函数用法：
# 离散型调色板
scale_color_paletteer_d(palette, direction = 1, dynamic = FALSE, ...)
scale_fill_paletteer_d(palette, direction = 1, dynamic = FALSE, ...)
# 连续型调色板
scale_color_paletteer_c(palette, direction = 1, ...)
scale_fill_paletteer_c(palette, direction = 1, ...)
scale_color_paletteer_binned(palette, direction = 1, ...)
scale_fill_paletteer_binned(palette, direction = 1, ...)
palette # 调色板名称的字符串，格式必须是packagename::palettename
direction # 取值为1或-1，为-1则逆转调色板的颜色
3.2 查看调色板具体颜色
我们可以查看每个调色板的具体颜色。
paletteer_c("scico::berlin", 10)
paletteer_d("nord::frost")
paletteer_d("wesanderson::Royal1", 4)
paletteer_d("Redmonder::dPBIPuOr", 10, type = "continuous")
pal <- paletteer_d("basetheme::clean")
pal %>%
fct_inorder() %>%
tibble(pal = .) %>%
gt::gt() %>%
gt::data_color(columns = vars(pal),
colors = as.character(pal))
4. paletteer包实战
paletteer包主要用于ggplot2图形，所以我们绘制ggplot2图形来进行演示。
4.1 离散型调色板
先绘制个基础的条形图。
library(ggplot2)
base_d <- ggplot(mpg, aes(class, fill = drv)) +
geom_bar()
base_d
ggsci包是一个很优秀的调色板，我们可以在paletteer包中使用ggsci包的调色板。
base_d + scale_fill_paletteer_d("ggsci::default_nejm")# 调色板可以自动补全名称
下面再绘制个散点图看看。
library(gcookbook) # 为了使用数据集
base_c <- ggplot(heightweight, aes(ageYear, heightIn, colour=sex)) +
geom_point(size = 3.5)base_c
base_c + scale_color_paletteer_d("basetheme::ink")
base_c + scale_color_paletteer_d("LaCroixColoR::Orange")
4.2 连续型调色板
先绘制个散点图。
ggplot(mtcars, aes(x=wt, y=mpg, colour=cyl)) +
geom_point(size = 3.5) +
scale_color_paletteer_c("ggthemes::Red-Gold")
ggplot(mtcars, aes(x=wt, y=mpg, colour=cyl)) +
geom_point(size = 3.5) +
scale_color_paletteer_c("ggthemes::Classic Area Green")
参考资料
paletteer: https://www.bing.com/search?q=paletteer&qs=n&form=QBLHCN&sp=-1&pq=&sc=0-0&sk=&cvid=F8B5A3DE0E464F8AABBD898E0C7BDF80
[2]R包: https://evamaerey.github.io/ggplot2_grammar_guide/paletteer.html#1
推荐：可以保存以下照片，在b站扫该二维码，或者b站搜索【庄闪闪】观看 R可视化系列视频教程。对应文稿可在公众号后台回复[可视化文稿]免费获得。
相关推荐
colourpicker包：图形颜色拾取器
visdat包：助你一眼看穿数据结构和缺失值！
report包：助你自动出统计报告！
reticulate包｜数据科学者的福音
ggThemeAssist包：交互式修改图形主题