R语言桑基图

桑基图,也称桑基图(Sankey Diagram),是一种用于展示数据流动的可视化工具。在R语言中,可以使用多种包来创建桑基图,最常用的包括networkD3ggalluvialriverplot等。以下是如何使用这些包创建桑基图的简单示例。

使用networkD3包创建桑基图

首先,确保你已经安装并加载了networkD3包:

R 复制代码
install.packages("networkD3")
library(networkD3)

接下来,准备数据并创建桑基图:

R 复制代码
# 准备数据
nodes <- data.frame(name = c("A", "B", "C", "D", "E", "F"))

links <- as.data.frame(matrix(c(
  0, 1, 10,
  0, 2, 20,
  1, 3, 30,
  2, 3, 40,
  2, 4, 10,
  3, 5, 10,
  4, 5, 10
), byrow = TRUE, ncol = 3))
names(links) <- c("source", "target", "value")

# 创建桑基图
sankey <- sankeyNetwork(Links = links, Nodes = nodes, Source = "source", 
                        Target = "target", Value = "value", NodeID = "name", 
                        sinksRight = FALSE)

# 展示桑基图
sankey

使用ggalluvial包创建桑基图

首先,确保你已经安装并加载了ggalluvial包:

R 复制代码
install.packages("ggalluvial")
library(ggalluvial)

接下来,准备数据并创建桑基图:

R 复制代码
# 准备数据
data <- data.frame(
  stage1 = c("A", "A", "B", "B", "C"),
  stage2 = c("X", "Y", "X", "Y", "Y"),
  freq = c(5, 10, 15, 20, 25)
)

# 创建桑基图
ggplot(data = data, aes(axis1 = stage1, axis2 = stage2, y = freq)) +
  geom_alluvium(aes(fill = stage1)) +
  geom_stratum() +
  geom_text(stat = "stratum", aes(label = after_stat(stratum))) +
  scale_x_discrete(limits = c("Stage 1", "Stage 2")) +
  theme_minimal()

使用riverplot包创建桑基图

首先,确保你已经安装并加载了riverplot包:

R 复制代码
install.packages("riverplot")
library(riverplot)

接下来,准备数据并创建桑基图:

R 复制代码
# 准备数据
nodes <- data.frame(ID = c("A", "B", "C", "D", "E", "F"))
edges <- data.frame(
  N1 = c("A", "A", "B", "C", "C", "D", "E"),
  N2 = c("B", "C", "D", "D", "E", "F", "F"),
  Value = c(10, 20, 30, 40, 10, 10, 10)
)

# 创建桑基图
river <- makeRiver(nodes, edges)
plot(river)

这些示例展示了如何在R语言中使用不同的包创建桑基图,你可以根据自己的需求选择合适的包进行可视化。如果有更具体的需求或问题,请告诉我,我可以提供进一步的帮助。

相关推荐
侃侃_天下2 天前
最终的信号类
开发语言·c++·算法
echoarts2 天前
Rayon Rust中的数据并行库入门教程
开发语言·其他·算法·rust
Aomnitrix2 天前
知识管理新范式——cpolar+Wiki.js打造企业级分布式知识库
开发语言·javascript·分布式
每天回答3个问题2 天前
UE5C++编译遇到MSB3073
开发语言·c++·ue5
伍哥的传说2 天前
Vite Plugin PWA – 零配置构建现代渐进式Web应用
开发语言·前端·javascript·web app·pwa·service worker·workbox
小莞尔2 天前
【51单片机】【protues仿真】 基于51单片机八路抢答器系统
c语言·开发语言·单片机·嵌入式硬件·51单片机
我是菜鸟0713号2 天前
Qt 中 OPC UA 通讯实战
开发语言·qt
JCBP_2 天前
QT(4)
开发语言·汇编·c++·qt·算法
Brookty2 天前
【JavaEE】线程安全-内存可见性、指令全排序
java·开发语言·后端·java-ee·线程安全·内存可见性·指令重排序
百锦再2 天前
[特殊字符] Python在CentOS系统执行深度指南
开发语言·python·plotly·django·centos·virtualenv·pygame