ggtech:您有一份来自Airbnb/Google的配色方案需要查收
小编以前年少无知,只知粗犷放养,不知精耕细作。有幸得到狗熊会各位大大指点,从前的野蛮生长的状态才有所改观。在此之前,小编的统计图画出来是这个样子的:
活生生的丑图百讲素材啊!八字真言没一个字满足。要是搁这弄成作业交上去,闭着眼睛都能听到水妈的怒吼:我要淘汰你!
参加完人才计划后,小编的统计图是这样的:
虽然这张箱线图算不上有多美观精致,但比起前一张已是云泥之别。至少满足了八字真言里的六个字准确简单有效,美观算不上,这里小编没有去找好看的配色。
所以,今天小编就介绍一款ggplot2的扩展配色包——ggtech。ggtech提取了一些知名科技公司 logo 的配色方案,并将其封装到相关的函数中以供用户调用。所以,简单的一个ggtech函数就可以让你的统计图换上Google/Airbnb/Facebook的新装。且看ggtech的具体用法。
按照惯例这类扩展包是需要通过 Git 来安装的:
devtools::install_github("ricardo-bion/ggtech", dependencies=TRUE)
先用 qplot 画个图:
library(ggplot2)
d <- qplot(carat, data = diamonds[diamonds$color %in% LETTERS[4:7],],
geom = "histogram", bins = 30, fill = color)
这张累积柱状图用的是 R 内置的 diamonds 数据集,对于不同克拉数的钻石进行了统计。R 的默认填充颜色有毛病吗?没毛病!我觉得也很中看,但是我们给她换上个爱彼迎的主题配色看看。
ggtech 在调用主题配色的时候主要用到两个函数 theme_tech 和 scale_fill_tech,在指定相关的配色主题之后,你就可以给你的统计图换上耳目一新的颜色啦。
d + theme_tech(theme="airbnb") +
scale_fill_tech(theme="airbnb") +
labs(title="Airbnb theme",
subtitle="now with subtitles for ggplot2 >= 2.1.0")
有没有感觉到配色很时尚很夺人眼球?!再换个谷歌配色看看。
d + theme_tech(theme="google") +
scale_fill_tech(theme="google") +
labs(title="Google theme",
subtitle="now with subtitles for ggplot2 >= 2.1.0")
和谷歌 logo 对比一下看看:
瞬间你的土鳖配色就接轨了谷歌。。。
此外还有 Facebook、Twitter以及 Etsy 等一些公司的配色可以选择,大家可以自己去尝试,喜欢哪款就用哪款,你要是都不喜欢小编也没有办法啦。
无聊的话还可以把谷歌的 logo 拿来玩玩,具体怎么玩,由你自己定。
d2 <- data.frame(x = c(1:4, 3:1), y=1:7)
ggplot(aes(x,y), data=d2) +
geom_tech(size=0.25, theme="google") +
theme_tech("google" ) +
ggtitle("Google geom")
今天小编就简单介绍到这里啦,后面内容敬请期待~
参考资料:
https://github.com/ricardo-bion/ggtech
往期精彩:
一个数据科学*者的学习历程