【R語言】--- 裳镀基圖

基本簡(jiǎn)介

桑基圖(Sankey diagram) 是用于描述一組值到另一組值流向的圖表阅悍,可以查看數(shù)據(jù)的變化情況好渠。主要應(yīng)用于能源、零售节视、金融拳锚、自媒體等數(shù)據(jù)的可視化分析。在R語言中寻行,苫舨簦基圖主要用到的是networkD3包。

示例代碼

#networkD3包繪制砂柚基圖
#安裝需要的R包
#處理數(shù)據(jù)
#install.packages("dplyr")
#繪制筛怂福基圖
#install.packages("networkD3")

#調(diào)用需要的R包
library(dplyr)
library(networkD3)
#產(chǎn)生數(shù)據(jù)集
#設(shè)置種子
set.seed(1234)
#構(gòu)建數(shù)據(jù)集
data <- data.frame(
  AA = paste0("AA_",1:5) %>% sample(100, replace = TRUE),
  BB = paste0("BB_", 1:10) %>% sample(100, replace = TRUE),
  Value = runif(100, 1, 10))
#查看前15行
head(data, 15)
#轉(zhuǎn)化為因子
data <- data %>% mutate_if(is.character, as.factor)
str(data)
nodes <- data.frame(node = c(data$AA, data$BB)) %>% unique()
data$ID_AA <- match(data$AA, nodes$node) - 1
data$ID_BB <- match(data$BB, nodes$node) - 1
#查看數(shù)據(jù)
head(data)
#作圖
sankeyNetwork(Links = data, Nodes = nodes, 
              Source = "ID_AA", Target = "ID_BB", Value = "Value",
              NodeID = "node",
              fontSize= 18, nodeWidth = 30)

參考文獻(xiàn)

[1] https://www.modb.pro/db/509252
[2] https://zhuanlan.zhihu.com/p/482446403

?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請(qǐng)聯(lián)系作者
  • 序言:七十年代末,一起剝皮案震驚了整個(gè)濱河市简卧,隨后出現(xiàn)的幾起案子兔魂,更是在濱河造成了極大的恐慌,老刑警劉巖举娩,帶你破解...
    沈念sama閱讀 219,539評(píng)論 6 508
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件入热,死亡現(xiàn)場(chǎng)離奇詭異,居然都是意外死亡晓铆,警方通過查閱死者的電腦和手機(jī)勺良,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 93,594評(píng)論 3 396
  • 文/潘曉璐 我一進(jìn)店門,熙熙樓的掌柜王于貴愁眉苦臉地迎上來骄噪,“玉大人尚困,你說我怎么就攤上這事×慈铮” “怎么了事甜?”我有些...
    開封第一講書人閱讀 165,871評(píng)論 0 356
  • 文/不壞的土叔 我叫張陵,是天一觀的道長(zhǎng)滔韵。 經(jīng)常有香客問我逻谦,道長(zhǎng),這世上最難降的妖魔是什么陪蜻? 我笑而不...
    開封第一講書人閱讀 58,963評(píng)論 1 295
  • 正文 為了忘掉前任邦马,我火速辦了婚禮,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘滋将。我一直安慰自己邻悬,他們只是感情好,可當(dāng)我...
    茶點(diǎn)故事閱讀 67,984評(píng)論 6 393
  • 文/花漫 我一把揭開白布随闽。 她就那樣靜靜地躺著父丰,像睡著了一般。 火紅的嫁衣襯著肌膚如雪掘宪。 梳的紋絲不亂的頭發(fā)上蛾扇,一...
    開封第一講書人閱讀 51,763評(píng)論 1 307
  • 那天,我揣著相機(jī)與錄音魏滚,去河邊找鬼屁桑。 笑死,一個(gè)胖子當(dāng)著我的面吹牛栏赴,可吹牛的內(nèi)容都是我干的蘑斧。 我是一名探鬼主播,決...
    沈念sama閱讀 40,468評(píng)論 3 420
  • 文/蒼蘭香墨 我猛地睜開眼须眷,長(zhǎng)吁一口氣:“原來是場(chǎng)噩夢(mèng)啊……” “哼竖瘾!你這毒婦竟也來了?” 一聲冷哼從身側(cè)響起花颗,我...
    開封第一講書人閱讀 39,357評(píng)論 0 276
  • 序言:老撾萬榮一對(duì)情侶失蹤捕传,失蹤者是張志新(化名)和其女友劉穎,沒想到半個(gè)月后扩劝,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體庸论,經(jīng)...
    沈念sama閱讀 45,850評(píng)論 1 317
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡,尸身上長(zhǎng)有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 38,002評(píng)論 3 338
  • 正文 我和宋清朗相戀三年棒呛,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了聂示。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片。...
    茶點(diǎn)故事閱讀 40,144評(píng)論 1 351
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡簇秒,死狀恐怖鱼喉,靈堂內(nèi)的尸體忽然破棺而出,到底是詐尸還是另有隱情趋观,我是刑警寧澤扛禽,帶...
    沈念sama閱讀 35,823評(píng)論 5 346
  • 正文 年R本政府宣布,位于F島的核電站皱坛,受9級(jí)特大地震影響编曼,放射性物質(zhì)發(fā)生泄漏。R本人自食惡果不足惜剩辟,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 41,483評(píng)論 3 331
  • 文/蒙蒙 一掐场、第九天 我趴在偏房一處隱蔽的房頂上張望往扔。 院中可真熱鬧,春花似錦刻肄、人聲如沸。這莊子的主人今日做“春日...
    開封第一講書人閱讀 32,026評(píng)論 0 22
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽。三九已至噪馏,卻和暖如春麦到,著一層夾襖步出監(jiān)牢的瞬間,已是汗流浹背欠肾。 一陣腳步聲響...
    開封第一講書人閱讀 33,150評(píng)論 1 272
  • 我被黑心中介騙來泰國打工瓶颠, 沒想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留,地道東北人刺桃。 一個(gè)月前我還...
    沈念sama閱讀 48,415評(píng)論 3 373
  • 正文 我出身青樓粹淋,卻偏偏與公主長(zhǎng)得像,于是被迫代替她去往敵國和親瑟慈。 傳聞我的和親對(duì)象是個(gè)殘疾皇子桃移,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 45,092評(píng)論 2 355

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