高水平SCI论文图表配色方案---ggsci

科学论文图表首先要规矩，符合期刊的投稿要求，然后在规矩的基础上实现图表的美观和专业。优秀的图表配色能够给人一种赏心悦目的感觉，激起读者对文章内容的兴趣，也可以给文章增添不少分值。

绘图的配色永远是一个技术活。

配色追求的是协调、美观、赏心悦目，最主要的是要展示出数据的特点，让读者抓住重点。千万不要非主流、五颜六色，凭自己的喜好配色，有时候不但让人感觉不严谨，同时让读者失去了读下去的兴趣。

今天给大家介绍一个专门用于发表SCI论文的配色方案。

ggsci包发表在：

https://github.com/road2stat/ggsci

安装稳定版本：

install.packages("ggsci")

安装最新的开发版本：

install.packages("devtools")

devtools::install_github("road2stat/ggsci")

睁大你的眼睛，一大波靓图来袭：

上图来源于ggsignif在github主页上的示例图

ggsci是ggplot2的插件包，主要有两个函数如下，使用方法和ggplot2的scale_color_***、scale_fill_***类似：

• scale_color_palname()

• scale_fill_palname()

部分杂志的函数如下：

SCI杂志非常多，每个杂志的要求不同：

孙老湿举栗子

单张图形的绘制：

library("ggsci")library("ggplot2")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()p1_nejm =p1 +scale_color_nejm()

图形拼接：

比如在一张画板上，绘制两张图，在ggplot2中处理起来比较麻烦，不过可以家在一个gridExtra包，并调用grid.arrange函数，设置排列方式，可以达到我们的目的：

library("gridExtra") 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() p1_nejm =p1 +scale_color_nejm()p2_nejm =p2 +scale_fill_nejm()grid.arrange(p1_nejm, p2_nejm, ncol =2)

本系列课程主要侧重于讲解图形原理，以及在R中的实现过程，并没有特意追求美观，故很多图的细节部分修饰有限，大家重点理解实现过程。

有任何问题，欢迎在文末留言讨论。

/End.

往期阅读：

扫码关注，获取更多精彩内容

我

是

彩

蛋

喜马拉雅FM搜索并订阅：生信者言；收听内容：

《一分钟听懂NGS基础概念》，让生信分析不再遥不可及

《亲爱的姑娘，你值得被温柔以待》，11个真实的人物故事

《众病之王：癌症传》，一起聆听人类对抗癌症的斗争史

回复文字：果然科学，看一篇好玩的科普文。