绘制简单云雨图代码参考:https://mp.weixin.qq.com/s/uyz-VI5sQI9D_MgeabgtpA
##云雨图
library(ggplot2)
library(geneRal)
library(tidyr)
library(dplyr)
#模拟数据
dat <- data.frame('group'=c(rep("c",30),rep(
绘制简单云雨图代码参考:https://mp.weixin.qq.com/s/uyz-VI5sQI9D_MgeabgtpA
##云雨图
library(ggplot2)
library(geneRal)
library(tidyr)
library(dplyr)
#模拟数据
dat <- data.frame('group'=c(rep("c",30),rep(