介绍
以桑基图形式展示数据分布情况
加载R包
knitr::opts_chunk$set(message = FALSE, warning = FALSE)
library(tidyverse)
library(ggalluvial)
# rm(list = ls())
options(stringsAsFactors = F)
options(future.globals.maxSize = 10000 * 1024^2)
数据下载
通过下列链接下载数据:
- 百度网盘链接:从百度网盘下载
- 提取码: mr2x
导入数据
metadata <- read.csv("Data_summary.csv")
head(metadata)