快速拥有顶刊同款美学,ggsci 4.1.0来了,新增400+palettes!
ggplot2强力扩展ggsci提供大量scientific journals配色,一行代码使用顶刊同款配色,
例如,
近日ggplot2强力扩展ggsci迎来4.1.0版本更新,新增400+套配色,来学习下。。。。。。
看看效果,
ggsci所有主题函数
ggsci提供如下几方面主题:scientific journals, data visualization libraries, science fiction movies, and TV shows,老版本主题如下:
ggsci主题使用
以The New England Journal of Medicine杂志配色主题为例。
library("ggsci")
library("ggplot2")
library("gridExtra")
options(repr.plot.width = 7.5, repr.plot.height = 4, repr.plot.res = 300)
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()
#使用NEJM杂志主题
p1_nejm = p1 + scale_color_nejm()
p2_nejm = p2 + scale_fill_nejm()
grid.arrange(p1,p2,p1_nejm, p2_nejm, ncol = 2)
以下绿色框为ggplot2默认主题,红色框为ggsci中的NEJM主题
更多ggsci主题展示,
本期结束!
🔥精彩推荐:
《保姆级R可视化教程》来了!
Python matplotlib保姆级教程
嫌Matplotlib繁琐?试试Seaborn!
复现Nature子刊上3张图,换数据即可用!
复现Nature“水”子刊上配图,换数据即可用!
喜提“Acceptance”,多亏这两张图,能顶60张图的工作量!
复现Nature正刊上3张图,换数据即可用!
复现IF50.0期刊上6张图,换数据即可用!
复现中科院IF 25.9期刊上3张图,换数据即可用!
复现Nature子刊中的2张图,换个数据即可用!
复现IF 48.5的期刊图,这个图帮你省下50%版面费!
喜提“Major Revision”,太多图,被质疑在堆工作量......
审稿人:凭这个3D Heatmap,必须给minor revision
复现Nature子刊上3张图,换数据即可用!
复现Nature“水”子刊上配图,换数据即可用!
喜提“Acceptance”,多亏这两张图,能顶60张图的工作量!
复现Nature正刊上3张图,换数据即可用!
复现IF50.0期刊上6张图,换数据即可用!
复现中科院IF 25.9期刊上3张图,换数据即可用!
复现Nature子刊中的2张图,换个数据即可用!
复现IF 48.5的期刊图,这个图帮你省下50%版面费!
喜提“Major Revision”,太多图,被质疑在堆工作量......
审稿人:凭这个3D Heatmap,必须给minor revision