R可視化——矩形樹(shù)圖的繪制

???? \color{red}{矩形樹(shù)圖(Treemap)}%是一種表示樹(shù)形數(shù)據(jù)的樹(shù)形關(guān)系及各個(gè)分類的占比的圖形,適合展現(xiàn)具有層級(jí)關(guān)系的數(shù)據(jù)寓涨,能夠直觀體現(xiàn)同級(jí)之間的比較澎蛛。

安裝、加載所需R包

#安裝包
install.packages("treemap")
#加載包
library(treemap)

數(shù)據(jù)

#數(shù)據(jù)——隨機(jī)生成繪圖數(shù)據(jù)
set.seed(12)#種子
df <- data.frame(
  samples=LETTERS[1:10],
  group=rep(c('x','y'), 5),
  value=sample(1:100, 10, replace = FALSE))
image.png

繪圖

1躏鱼、查看繪圖參數(shù):
#查看參數(shù)
??treemap
treemap(dtf,index,vSize,vColor = NULL,stdErr = NULL,
  type = "index",fun.aggregate = "sum",title = NA,title.legend = NA,
  algorithm = "pivotSize",sortID = "-size",mirror.x = FALSE,mirror.y = FALSE,
  palette = NA,palette.HCL.options = NULL,range = NA,mapping = NA,
  n = 7,na.rm = TRUE,na.color = "#DDDDDD",na.text = "Missing",
  fontsize.title = 14,fontsize.labels = 11,
  fontsize.legend = 12,fontcolor.labels = NULL,
  fontface.labels = c("bold", rep("plain", length(index) - 1)),
  fontfamily.title = "sans",fontfamily.labels = "sans",
  fontfamily.legend = "sans",border.col = "black",
  border.lwds = c(length(index) + 1, (length(index) - 1):1),
  lowerbound.cex.labels = 0.4,inflate.labels = FALSE,bg.labels = NULL,
  force.print.labels = FALSE,overlap.labels = 0.5,align.labels = c("center", "center"),
  xmod.labels = 0,ymod.labels = 0,eval.labels = FALSE,position.legend = NULL,
  reverse.legend = FALSE,format.legend = NULL,drop.unused.levels = TRUE,
  aspRatio = NA,vp = NULL,draw = TRUE,...)

?? ? ? 下面簡(jiǎn)單介紹常見(jiàn)的幾種圖形繪制氮采,如果大家感興趣可以根據(jù)treemap()函數(shù)中的參數(shù)繪制自己喜歡的Treemap!

2、單一分組變量——只通過(guò)“samples”單一分類變量進(jìn)行繪圖:

1)根據(jù)值大小填色

treemap(df, #數(shù)據(jù)
        index = "samples",#分類變量
        vSize = "value",#分類變量對(duì)應(yīng)數(shù)據(jù)值
        vColor="value",#顏色深淺的對(duì)應(yīng)列
        type = "value",#"顏色映射方式,"index"染苛、"value"鹊漠、"comp"、"dens"茶行、"depth"躯概、"categorical"、"color"畔师、"manual"
        title = 'Treemap',#標(biāo)題
        border.col = "grey",#邊框顏色
        border.lwds = 4,#邊框線寬度
        fontsize.labels = 12,#標(biāo)簽大小
        fontcolor.labels = 'red',#標(biāo)簽顏色
        align.labels = list(c("center", "center")),#標(biāo)簽位置
        fontface.labels = 2)#標(biāo)簽字體:1,2,3,4 表示正常娶靡、粗體、斜體茉唉、粗斜體
image.png

2)根據(jù)分類填色

treemap(df, #數(shù)據(jù)
        index = "samples",#分類變量
        vSize = "value",#分類變量對(duì)應(yīng)數(shù)據(jù)值
        vColor="index",#顏色深淺的對(duì)應(yīng)列
        type = "index",#"顏色映射方式,"index"固蛾、"value"、"comp"度陆、"dens"艾凯、"depth"、"categorical"懂傀、"color"趾诗、"manual"
        title = 'Treemap',#標(biāo)題
        border.col = "grey",#邊框顏色
        border.lwds = 4,#邊框線寬度
        fontsize.labels = 12,#標(biāo)簽大小
        fontcolor.labels = 'white',#標(biāo)簽顏色
        align.labels = list(c("center", "center")),#標(biāo)簽位置
        fontface.labels = 2)#標(biāo)簽字體:1,2,3,4 表示正常、粗體、斜體恃泪、粗斜體
image.png
3郑兴、多個(gè)分類變量——基于“group”、“samples”兩個(gè)分類變量進(jìn)行繪圖:

1)根據(jù)值大小填色

treemap(df, #數(shù)據(jù)
        index = c("group","samples"),#分類變量
        vSize = "value",#分類變量對(duì)應(yīng)數(shù)據(jù)值
        vColor="value",#顏色深淺的對(duì)應(yīng)列
        type = "value",#"顏色映射方式,"index"贝乎、"value"情连、"comp"、"dens"览效、"depth"却舀、"categorical"、"color"锤灿、"manual"
        title = 'Treemap',#標(biāo)題
        border.col = c("black","white"),#邊框顏色
        border.lwds = c(4,1),#邊框線寬度
        fontsize.labels = c(18,10),#標(biāo)簽大小
        bg.labels=c("transparent"),#標(biāo)題背景色
        fontcolor.labels = c('white',"orange"),#標(biāo)簽顏色
        align.labels = list(c("left", "top"),
                            c("center", "center")),#標(biāo)簽位置
        fontface.labels = c(2,3))#標(biāo)簽字體:1,2,3,4 表示正常挽拔、粗體、斜體但校、粗斜體
image.png

2)根據(jù)分類填色

treemap(df, #數(shù)據(jù)
        index = c("group","samples"),#分類變量
        vSize = "value",#分類變量對(duì)應(yīng)數(shù)據(jù)值
        palette = "Set1",#自定義調(diào)色
        vColor="index",#顏色深淺的對(duì)應(yīng)列
        type = "index",#"顏色映射方式,"index"螃诅、"value"、"comp"状囱、"dens"术裸、"depth"、"categorical"浪箭、"color"穗椅、"manual"
        title = 'Treemap',#標(biāo)題
        border.col = c("black","white"),#邊框顏色
        border.lwds = c(4,1),#邊框線寬度
        fontsize.labels = c(18,10),#標(biāo)簽大小
        bg.labels=c("transparent"),#標(biāo)題背景色
        fontcolor.labels = c('white',"orange"),#標(biāo)簽顏色
        align.labels = list(c("left", "top"),
                            c("center", "center")),#標(biāo)簽位置
        fontface.labels = c(2,3))#標(biāo)簽字體:1,2,3,4 表示正常、粗體奶栖、斜體匹表、粗斜體
image.png
參考:https://r-graph-gallery.com/treemap.html
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個(gè)濱河市宣鄙,隨后出現(xiàn)的幾起案子袍镀,更是在濱河造成了極大的恐慌,老刑警劉巖冻晤,帶你破解...
    沈念sama閱讀 217,509評(píng)論 6 504
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件苇羡,死亡現(xiàn)場(chǎng)離奇詭異,居然都是意外死亡鼻弧,警方通過(guò)查閱死者的電腦和手機(jī)设江,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 92,806評(píng)論 3 394
  • 文/潘曉璐 我一進(jìn)店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來(lái)攘轩,“玉大人叉存,你說(shuō)我怎么就攤上這事《劝铮” “怎么了歼捏?”我有些...
    開(kāi)封第一講書(shū)人閱讀 163,875評(píng)論 0 354
  • 文/不壞的土叔 我叫張陵稿存,是天一觀的道長(zhǎng)。 經(jīng)常有香客問(wèn)我瞳秽,道長(zhǎng)瓣履,這世上最難降的妖魔是什么? 我笑而不...
    開(kāi)封第一講書(shū)人閱讀 58,441評(píng)論 1 293
  • 正文 為了忘掉前任练俐,我火速辦了婚禮袖迎,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘腺晾。我一直安慰自己瓢棒,他們只是感情好,可當(dāng)我...
    茶點(diǎn)故事閱讀 67,488評(píng)論 6 392
  • 文/花漫 我一把揭開(kāi)白布丘喻。 她就那樣靜靜地躺著,像睡著了一般念颈。 火紅的嫁衣襯著肌膚如雪泉粉。 梳的紋絲不亂的頭發(fā)上,一...
    開(kāi)封第一講書(shū)人閱讀 51,365評(píng)論 1 302
  • 那天榴芳,我揣著相機(jī)與錄音嗡靡,去河邊找鬼。 笑死窟感,一個(gè)胖子當(dāng)著我的面吹牛讨彼,可吹牛的內(nèi)容都是我干的。 我是一名探鬼主播柿祈,決...
    沈念sama閱讀 40,190評(píng)論 3 418
  • 文/蒼蘭香墨 我猛地睜開(kāi)眼哈误,長(zhǎng)吁一口氣:“原來(lái)是場(chǎng)噩夢(mèng)啊……” “哼!你這毒婦竟也來(lái)了躏嚎?” 一聲冷哼從身側(cè)響起蜜自,我...
    開(kāi)封第一講書(shū)人閱讀 39,062評(píng)論 0 276
  • 序言:老撾萬(wàn)榮一對(duì)情侶失蹤,失蹤者是張志新(化名)和其女友劉穎卢佣,沒(méi)想到半個(gè)月后重荠,有當(dāng)?shù)厝嗽跇?shù)林里發(fā)現(xiàn)了一具尸體,經(jīng)...
    沈念sama閱讀 45,500評(píng)論 1 314
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡虚茶,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 37,706評(píng)論 3 335
  • 正文 我和宋清朗相戀三年戈鲁,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片嘹叫。...
    茶點(diǎn)故事閱讀 39,834評(píng)論 1 347
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡婆殿,死狀恐怖,靈堂內(nèi)的尸體忽然破棺而出待笑,到底是詐尸還是另有隱情鸣皂,我是刑警寧澤,帶...
    沈念sama閱讀 35,559評(píng)論 5 345
  • 正文 年R本政府宣布,位于F島的核電站寞缝,受9級(jí)特大地震影響癌压,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜荆陆,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 41,167評(píng)論 3 328
  • 文/蒙蒙 一滩届、第九天 我趴在偏房一處隱蔽的房頂上張望。 院中可真熱鬧被啼,春花似錦帜消、人聲如沸。這莊子的主人今日做“春日...
    開(kāi)封第一講書(shū)人閱讀 31,779評(píng)論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽(yáng)。三九已至命浴,卻和暖如春娄猫,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背生闲。 一陣腳步聲響...
    開(kāi)封第一講書(shū)人閱讀 32,912評(píng)論 1 269
  • 我被黑心中介騙來(lái)泰國(guó)打工媳溺, 沒(méi)想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留,地道東北人碍讯。 一個(gè)月前我還...
    沈念sama閱讀 47,958評(píng)論 2 370
  • 正文 我出身青樓悬蔽,卻偏偏與公主長(zhǎng)得像,于是被迫代替她去往敵國(guó)和親捉兴。 傳聞我的和親對(duì)象是個(gè)殘疾皇子蝎困,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 44,779評(píng)論 2 354

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