github-actions[bot]
commented
2 years ago {NatParksPalettes}: 跟着R包“云旅游”～ by R语言和统计
气温和疫情让旅游计划一再搁浅，“不甘心”的小编找到一个R包，它居然收集多个国家公园的景色，并将其做成调色盘供大家选择！
今天就来跟着{NatParksPalettes}[1]参观一下这些美丽的“风景”吧！
首先，安装并载入R包：
# 安装
install.packages("devtools")
devtools::install_github("kevinsblake/NatParksPalettes")
# 载入
library(NatParksPalettes)再查看其中所有调色盘（公园）的名称：
names(NatParksPalettes)接下来，使用代码提取几个调色盘的颜色，并展示出来。
因为{NatParksPalettes}所使用的代码与之前介绍的R包{MetBrewer}类似，所以我们可以轻松上手～
首先提取"Acadia"中所有颜色：
natparks.pals(name = "Acadia")"Acadia"中默认颜色有九种。
如果我们只需要7个颜色，代码如下：
natparks.pals(name = "Acadia", n = 7, type = "discrete")因为代码n=7且type = "discrete"，所以提取了调色盘中的前七个颜色。如果 type = "continuous"，则提取颜色的方式是不同的，后面的例子会提到。
假设已知"KingsCanyon"中默认有六种颜色，但是我们想要使用的颜色超过默认的颜色个数，例如15个颜色：
natparks.pals("KingsCanyon", n = 15, type = "continuous")代码type = "continuous"，指代获取颜色的方式是以连续的形式从默认颜色中提取新颜色。n = 15，所以得到15个新颜色。
假如想提取100个颜色，也能轻松实现：
natparks.pals("Yellowstone", n = 100)配色都绝美，大自然果然是最伟大的艺术家！
小编突然来了点创作欲望，想使用一下国家公园的调色～
以Yellowstone National Park为例，使用到了调色盘"Yellowstone"，做个多组别的直方图：
library(ggplot2) # 需安装：install.packages("ggplot2")
ggplot(diamonds, aes(x = price)) +
geom_histogram(aes(fill = cut), bins = 50) +
scale_fill_manual(values = natparks.pals("Yellowstone")) + # 使用了调色盘中的前五种
theme_light()好啦，今天的内容就到这里。
如果有帮助，记得分享给需要的人！
参考资料
[1]. https://github.com/kevinsblake/NatParksPalettes
https://mp.weixin.qq.com/s/PiNpTxca8OfS3t-6ucRelw