R語(yǔ)言ggplot2作圖好看的配色備選

配色來源于論文 https://www.nature.com/articles/s41577-022-00707-2 里面圖的顏色看起來非常舒服禀横,摘下來作為自己數(shù)據(jù)可視化作圖的備選項(xiàng)

第一個(gè)圖

image.png

八個(gè)配色

library(ggplot2)

cols<-c("#88c4e8","#db6968","#982b2b","#0074b3",
        "#e5ce81","#f47720","#459943","#bdc3d2")

dat01<-data.frame(x=LETTERS[1:8],
                  y=1)
ggplot(data=dat01,aes(x=x,y=y))+
  geom_col(aes(fill=x),show.legend = FALSE)+
  scale_fill_manual(values = cols)+
  theme_bw()
image.png

第二個(gè)圖


image.png

四個(gè)顏色


cols02<-c("#606f8a","#e8c559","#ea9c9d","#005496")

dat02<-data.frame(x=LETTERS[1:4],
                  y=1)
ggplot(data=dat02,aes(x=x,y=y))+
  geom_col(aes(fill=x),show.legend = FALSE)+
  scale_fill_manual(values = cols02)+
  theme_bw()
image.png

第三個(gè)圖

image.png

六個(gè)顏色

cols03<-c("#93cc82","#4d97cd","#f6f5ee","#ea9c9d",
          "#c74546","#88c4e8")

dat03<-data.frame(x=LETTERS[1:6],
                  y=1)
ggplot(data=dat03,aes(x=x,y=y))+
  geom_col(aes(fill=x),show.legend = FALSE)+
  scale_fill_manual(values = cols03)+
  theme_bw()
image.png

第四個(gè)圖

image.png

8個(gè)顏色

這個(gè)可能和第一個(gè)有重疊

cols04<-c("#db6968","#4d97cd","#99cbeb","#459943",
          "#fdc58f","#e8c559","#a3d393","#f8984e")

dat04<-data.frame(x=LETTERS[1:8],
                  y=1)
ggplot(data=dat04,aes(x=x,y=y))+
  geom_col(aes(fill=x),show.legend = FALSE)+
  scale_fill_manual(values = cols04)+
  theme_bw()
image.png
image.png

歡迎大家關(guān)注我的公眾號(hào)

小明的數(shù)據(jù)分析筆記本

小明的數(shù)據(jù)分析筆記本 公眾號(hào) 主要分享:1纵顾、R語(yǔ)言和python做數(shù)據(jù)分析和數(shù)據(jù)可視化的簡(jiǎn)單小例子;2、園藝植物相關(guān)轉(zhuǎn)錄組學(xué)妇蛀、基因組學(xué)、群體遺傳學(xué)文獻(xiàn)閱讀筆記洲守;3涡驮、生物信息學(xué)入門學(xué)習(xí)資料及自己的學(xué)習(xí)筆記!

最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末腾供,一起剝皮案震驚了整個(gè)濱河市仆邓,隨后出現(xiàn)的幾起案子鲜滩,更是在濱河造成了極大的恐慌,老刑警劉巖节值,帶你破解...
    沈念sama閱讀 206,126評(píng)論 6 481
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件徙硅,死亡現(xiàn)場(chǎng)離奇詭異,居然都是意外死亡搞疗,警方通過查閱死者的電腦和手機(jī)嗓蘑,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 88,254評(píng)論 2 382
  • 文/潘曉璐 我一進(jìn)店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來匿乃,“玉大人桩皿,你說我怎么就攤上這事〈闭ǎ” “怎么了泄隔?”我有些...
    開封第一講書人閱讀 152,445評(píng)論 0 341
  • 文/不壞的土叔 我叫張陵,是天一觀的道長(zhǎng)宛徊。 經(jīng)常有香客問我佛嬉,道長(zhǎng),這世上最難降的妖魔是什么闸天? 我笑而不...
    開封第一講書人閱讀 55,185評(píng)論 1 278
  • 正文 為了忘掉前任暖呕,我火速辦了婚禮,結(jié)果婚禮上苞氮,老公的妹妹穿的比我還像新娘湾揽。我一直安慰自己,他們只是感情好笼吟,可當(dāng)我...
    茶點(diǎn)故事閱讀 64,178評(píng)論 5 371
  • 文/花漫 我一把揭開白布库物。 她就那樣靜靜地躺著,像睡著了一般赞厕。 火紅的嫁衣襯著肌膚如雪艳狐。 梳的紋絲不亂的頭發(fā)上,一...
    開封第一講書人閱讀 48,970評(píng)論 1 284
  • 那天皿桑,我揣著相機(jī)與錄音毫目,去河邊找鬼。 笑死诲侮,一個(gè)胖子當(dāng)著我的面吹牛镀虐,可吹牛的內(nèi)容都是我干的。 我是一名探鬼主播沟绪,決...
    沈念sama閱讀 38,276評(píng)論 3 399
  • 文/蒼蘭香墨 我猛地睜開眼刮便,長(zhǎng)吁一口氣:“原來是場(chǎng)噩夢(mèng)啊……” “哼!你這毒婦竟也來了绽慈?” 一聲冷哼從身側(cè)響起恨旱,我...
    開封第一講書人閱讀 36,927評(píng)論 0 259
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤辈毯,失蹤者是張志新(化名)和其女友劉穎,沒想到半個(gè)月后搜贤,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體谆沃,經(jīng)...
    沈念sama閱讀 43,400評(píng)論 1 300
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 35,883評(píng)論 2 323
  • 正文 我和宋清朗相戀三年仪芒,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了唁影。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片。...
    茶點(diǎn)故事閱讀 37,997評(píng)論 1 333
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡掂名,死狀恐怖据沈,靈堂內(nèi)的尸體忽然破棺而出,到底是詐尸還是另有隱情饺蔑,我是刑警寧澤锌介,帶...
    沈念sama閱讀 33,646評(píng)論 4 322
  • 正文 年R本政府宣布,位于F島的核電站膀钠,受9級(jí)特大地震影響掏湾,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜肿嘲,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 39,213評(píng)論 3 307
  • 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望筑公。 院中可真熱鬧雳窟,春花似錦、人聲如沸匣屡。這莊子的主人今日做“春日...
    開封第一講書人閱讀 30,204評(píng)論 0 19
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)捣作。三九已至誉结,卻和暖如春,著一層夾襖步出監(jiān)牢的瞬間券躁,已是汗流浹背惩坑。 一陣腳步聲響...
    開封第一講書人閱讀 31,423評(píng)論 1 260
  • 我被黑心中介騙來泰國(guó)打工, 沒想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留也拜,地道東北人以舒。 一個(gè)月前我還...
    沈念sama閱讀 45,423評(píng)論 2 352
  • 正文 我出身青樓,卻偏偏與公主長(zhǎng)得像慢哈,于是被迫代替她去往敵國(guó)和親蔓钟。 傳聞我的和親對(duì)象是個(gè)殘疾皇子,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 42,722評(píng)論 2 345

推薦閱讀更多精彩內(nèi)容