R语言多层桑基图_R语言可视化（二十三）：桑基图绘制

23. 桑基图绘制

清除当前环境中的变量

rm(list=ls())

设置工作目录

setwd("C:/Users/Dell/Desktop/R_Plots/23sankey/")

使用riverplot包绘制桑基图

# 安装并加载所需的R包

#install.packages("riverplot")

library(riverplot)

# 构建测序数据集

nodes

nodes

## [1] "A" "B" "C" "D" "E"

edges

B = list( C= 5 ),

C = list( D= 4 ),

E = list( C= 3 )

)

edges

## $A

## $A$C

## [1] 6

##

##

## $B

## $B$C

## [1] 5

##

##

## $C

## $C$D

## [1] 4

##

##

## $E

## $E$C

## [1] 3

# 使用makeRiver函数构造riverplot对象

r

node_xpos= c( 1,1,2,3,3 ),

node_labels= c( A= "Node A", B= "Node B", C= "Node C", D= "Node D", E= "Node E" ),

node_styles= list( A= list( col= "yellow" ), D= list( col= "blue" ), E= list( col= "red" )))

r

## $edges

## ID N1 N2 Value

## A->C A->C A C 6

## B->C B->C B C 5

## C->D C->D C D 4

## E->C E->C E C 3

##

## $nodes

## ID x labels

## A A 1 Node A

## B B 1 Node B

## C C 2 Node C

## D D 3 Node D

## E E 3 Node E

##

## $styles

## $styles$A

## $styles$A$col

## [1] "yellow"

##

##