R語(yǔ)言可視化學(xué)習(xí)筆記之相關(guān)矩陣可視化包ggcorrplot


基于ggplot2包以及corrplot包的相關(guān)矩陣可視化包ggcorrplot僻爽,ggcorrplot包提供對(duì)相關(guān)矩陣重排序以及在相關(guān)圖中展示顯著性水平的方法,同時(shí)也能計(jì)算相關(guān)性p-value
<a id="more"></a>

計(jì)算相關(guān)矩陣(cor()計(jì)算結(jié)果不提供p-value)

library(ggcorrplot)
data("mtcars")
corr <- round(cor(mtcars), 1)
head(corr[, 1:6])

用ggcorrplot包提供的函數(shù)cor_pmat()

p.mat <- cor_pmat(mtcars)

head(p.mat[, 1:4])

可視化相關(guān)性矩陣

ggcorrplot(corr)#method默認(rèn)為square

方法為circle

ggcorrplot(corr, method = "circle")

重排矩陣要糊,使用分等級(jí)聚類(lèi)

ggcorrplot(corr, hc.order = TRUE, outline.color = "white")

控制矩陣形狀

ggcorrplot(corr, hc.order = TRUE, type = "lower", outline.color = "white")#下三角形

上三角形

ggcorrplot(corr, hc.order = TRUE, type = "upper", outline.color = "white")

更改顏色以及主題

ggcorrplot(corr, hc.order = TRUE, type = "lower", outline.color = "white", 

ggtheme = ggplot2::theme_gray, colors = c("#6D9EC1", "white", "#E46726"))

添加相關(guān)系數(shù)

ggcorrplot(corr, hc.order = TRUE, type = "lower", lab = TRUE)

增加顯著性水平葫松,不顯著的話(huà)就不添加了

ggcorrplot(corr, hc.order = TRUE, type = "lower", p.mat = p.mat)

將不顯著的色塊設(shè)置成空白

ggcorrplot(corr, p.mat = p.mat, hc.order=TRUE, type = "lower", insig = "blank")

轉(zhuǎn)載https://ytlogos.github.io/2017/06/25/R%E8%AF%AD%E8%A8%80%E5%8F%AF%E8%A7%86%E5%8C%96%E5%AD%A6%E4%B9%A0%E7%AC%94%E8%AE%B0%E4%B9%8B%E7%9B%B8%E5%85%B3%E7%9F%A9%E9%98%B5%E5%8F%AF%E8%A7%86%E5%8C%96%E5%8C%85ggcorrplot/

?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個(gè)濱河市,隨后出現(xiàn)的幾起案子,更是在濱河造成了極大的恐慌负间,老刑警劉巖紊扬,帶你破解...
    沈念sama閱讀 216,372評(píng)論 6 498
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件,死亡現(xiàn)場(chǎng)離奇詭異唉擂,居然都是意外死亡,警方通過(guò)查閱死者的電腦和手機(jī)檀葛,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 92,368評(píng)論 3 392
  • 文/潘曉璐 我一進(jìn)店門(mén),熙熙樓的掌柜王于貴愁眉苦臉地迎上來(lái),“玉大人抄瑟,你說(shuō)我怎么就攤上這事臭墨。” “怎么了润讥?”我有些...
    開(kāi)封第一講書(shū)人閱讀 162,415評(píng)論 0 353
  • 文/不壞的土叔 我叫張陵转锈,是天一觀的道長(zhǎng)。 經(jīng)常有香客問(wèn)我楚殿,道長(zhǎng)撮慨,這世上最難降的妖魔是什么? 我笑而不...
    開(kāi)封第一講書(shū)人閱讀 58,157評(píng)論 1 292
  • 正文 為了忘掉前任脆粥,我火速辦了婚禮砌溺,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘变隔。我一直安慰自己规伐,他們只是感情好,可當(dāng)我...
    茶點(diǎn)故事閱讀 67,171評(píng)論 6 388
  • 文/花漫 我一把揭開(kāi)白布匣缘。 她就那樣靜靜地躺著猖闪,像睡著了一般。 火紅的嫁衣襯著肌膚如雪肌厨。 梳的紋絲不亂的頭發(fā)上培慌,一...
    開(kāi)封第一講書(shū)人閱讀 51,125評(píng)論 1 297
  • 那天,我揣著相機(jī)與錄音柑爸,去河邊找鬼检柬。 笑死,一個(gè)胖子當(dāng)著我的面吹牛竖配,可吹牛的內(nèi)容都是我干的何址。 我是一名探鬼主播,決...
    沈念sama閱讀 40,028評(píng)論 3 417
  • 文/蒼蘭香墨 我猛地睜開(kāi)眼进胯,長(zhǎng)吁一口氣:“原來(lái)是場(chǎng)噩夢(mèng)啊……” “哼用爪!你這毒婦竟也來(lái)了?” 一聲冷哼從身側(cè)響起胁镐,我...
    開(kāi)封第一講書(shū)人閱讀 38,887評(píng)論 0 274
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤偎血,失蹤者是張志新(化名)和其女友劉穎诸衔,沒(méi)想到半個(gè)月后,有當(dāng)?shù)厝嗽跇?shù)林里發(fā)現(xiàn)了一具尸體颇玷,經(jīng)...
    沈念sama閱讀 45,310評(píng)論 1 310
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡笨农,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 37,533評(píng)論 2 332
  • 正文 我和宋清朗相戀三年,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了帖渠。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片谒亦。...
    茶點(diǎn)故事閱讀 39,690評(píng)論 1 348
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡,死狀恐怖空郊,靈堂內(nèi)的尸體忽然破棺而出份招,到底是詐尸還是另有隱情,我是刑警寧澤狞甚,帶...
    沈念sama閱讀 35,411評(píng)論 5 343
  • 正文 年R本政府宣布锁摔,位于F島的核電站,受9級(jí)特大地震影響哼审,放射性物質(zhì)發(fā)生泄漏谐腰。R本人自食惡果不足惜,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 41,004評(píng)論 3 325
  • 文/蒙蒙 一涩盾、第九天 我趴在偏房一處隱蔽的房頂上張望怔蚌。 院中可真熱鬧,春花似錦旁赊、人聲如沸桦踊。這莊子的主人今日做“春日...
    開(kāi)封第一講書(shū)人閱讀 31,659評(píng)論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)籍胯。三九已至,卻和暖如春离福,著一層夾襖步出監(jiān)牢的瞬間杖狼,已是汗流浹背。 一陣腳步聲響...
    開(kāi)封第一講書(shū)人閱讀 32,812評(píng)論 1 268
  • 我被黑心中介騙來(lái)泰國(guó)打工妖爷, 沒(méi)想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留蝶涩,地道東北人。 一個(gè)月前我還...
    沈念sama閱讀 47,693評(píng)論 2 368
  • 正文 我出身青樓絮识,卻偏偏與公主長(zhǎng)得像绿聘,于是被迫代替她去往敵國(guó)和親。 傳聞我的和親對(duì)象是個(gè)殘疾皇子次舌,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 44,577評(píng)論 2 353

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