横空出世！最强配色网站！R包色彩库一网打尽，顶刊论文平面设计轻松美图

你还在文章、设计稿的颜色配色发愁吗？看看这篇，打开你的新世界大门。

大家都知道我很喜欢捣鼓代码，但是大家可能不知道我其实超级喜欢设计。当我读大一的时候，就喜欢逃课在宿舍学习photoshop、看一些平面设计网站。这也也给后来的ppt制作、网页制作留下了一定的审美的种子。大二的时候我还幻想要做平面设计师呢哈哈。

对了，我还超级喜欢吃，每次开会有时间就会去当地找特色饭馆主打一个地道环境无所谓。也许以后闲下来，公众号开通个吃货支线任务篇也是很大概率的。

言归正传，今天的内容就是讲配色，之前我公众号写过几篇色板的，ggsci、cols4all等等，但是有个问题都需要安装且在shiny中调用。起码我自己要颜色，更喜欢琳琅满目直接糊在我脸上的色卡，也喜欢不想动脑直接给我推荐的套餐，偶尔闲暇来DIY自己操作的颜色。

要同时满足我的口味，很可惜，目前没有见到好的网站(我见识少，别怪)。于是，我自己做了一个，符合我口味的实战医学统计的配色网站（我喜欢小清新，老了喜欢嫩勿怪），主打一个快速预览方便复制，纯科研向。下面全是干货！

一、最强配色网站

https://niezhiqiang.shinyapps.io/colortools，未来会放到个人网站下，zhihuishuju.com，还没做好网站，先在公网上用着哈。

全球最强科研配色网站，我觉得应该是唯一的吧。因为我多年搜索配色，包括adobe的网站都不咋好用。

我开发的这个，写论文画图配色都可以用，极致美学，助力科研，完全免费！所以本网站请勿用于商用，仅供学术分享、撰写论文用。

网站分4个小模块，点击后会激活文字底色。很容易用，你们先登录，然后操作2遍就好了。个人配色可单个，可批量复制。顶刊配色是我归纳的高分SCI套餐还有一些中文名字代表主题，都设定了copy按钮，但是不一定100%和你看的文章一致。R包配色是市面上能找到的全部R包，海量存储，你需要的拓展都在。演示案例是你前面copy的颜色，点它可以动态匹配色卡和统计图。

so，根据你的喜好，来看看色卡库吧。

1.1 个人配色

我制作了个个人DIY点击即可复制的色卡工具。单色或渐进多色，自己根据喜好来设置。顶部 #EDB0C2：当前选中的颜色的 HEX 码，也就是Rstudio里面直接复制的色码。右上角 HSL / RGB：切换用哪种方式调色、查看数值。

三条滑条（从上到下通常是）：Hue 色相：彩虹条（0–360°），Saturation 饱和度：从灰到彩（0–100%），Lightness 亮度：从黑→当前色→白（0–100%）。 这里我设计了个小黄点，就是和你上面调的单色几乎一样的色码。同时也能生成2-60个渐进色，支持你手动输入的。

1.2 顶刊配色

R的主流配色包大多数不能直观的看到所选择色板的配色，往往需要查看R包网页，或一个个尝试(paletteer包、RColorBrewer包、grDevices包、)，效率低下。优秀的一些色卡R包，colorspace或者cols4all都要去R包中来回切换。且顶刊配色往往并不在色卡中。

1.2.1 顶刊SCI颜色

收集了很多网络配色资源，尤其是很多好的CNS和医学4大顶刊的图文素材。目前精选了88种 款式，16款SCI糖果色、剩下62款中文情调色，后来我又考虑ggsci的普及性加上了24款内置 色彩，大家看看喜欢哪个都可以。

从8到14色，搭配。例如你只有5组，就可以选8的任意5色，都是很美美的。

1.2.2 ggsci杂志色

ggsci v4.2包(https://cran.r-project.org/web/packages/ggsci/vignettes/ggsci.html)内置了各大顶级期刊的主流配色；缺点则是有level水平的限制，自己专业杂志没入选。惊喜的是frontiers在哦。

1.3 R包配色

整理了海量的R包配色，相当于一个工具池。我常规用不会超过16组配色，超过了可以用这个。我设置了支持从2到60个色块，完全足够用吧。 工具拆分3大类Categorical (定性)、Sequential (渐进)、Diverging (发散)，以及 All (全部)。内置了市面上几乎全部的R包。brewer、c4a（/cols4all）、carto、hcl、kovesi、met、parks、poly、scico、seaborn、stevens、tableau、tol、viridis、wes、misc。

1.4 演示案例

这部分是方便你看实际效果的，我选择了线性模型，就看看效果。具体你想用在自己数据，看后面的R实战。

二、R代码实战

ggplot2中，用网页代码手工取代对应的颜色码即可！

#-------- ggplot2 -------
library(ggsci)
library(ggplot2)
#使用R内置数据集创建箱线图作为本次范例：
##
data(singer,package="lattice")
p<-ggplot(singer,aes(x=voice.part,y=height,fill=voice.part,color=voice.part,alpha=0.8))+geom_boxplot()
p<-p+theme_bw()+coord_fixed(ratio=0.25)
p

#-------1 ggsci -------
#NEJM, 不同杂志后缀不一样；npg、bmj、jco等等
p1<-p+scale_color_nejm()+scale_fill_nejm()
p1

#-------2 智荟色卡替换-------
#  手动复制的内容粘贴到 c() 里面
my_colors <-  c( "#FBB4AE", "#B3CDE3", "#CCEBC5", "#DECBE4", "#FED9A6", "#FFFFCC", "#E5D8BD", "#FDDAEC", "#F2F2F2" )

#?? ggplot2使用 scale_color_manual、scale_fill_manual + my_colors！
p2 <- p + 
  scale_color_manual(values = my_colors) +  # 替换 scale_color_npg()
  scale_fill_manual(values = my_colors)     # 替换 scale_fill_npg()
p2

三、小结

最强科研配色网站，niezhiqiang.shinyapps.io/colortools， ????????????六星推荐。