()+
geom_ribbon(data=dat02,
aes(x=x,ymin=y1,ymax=y3,
fill=group,color...=group),
alpha=0.5)+
geom_line(data=dat02,
aes(x=x,y=y2,...expand = c(0,0),
limits = c(0.3,15.7))+
ggnewscale::new_scale_fill()+
geom_ribbon...aes(x=x,ymin=y1,ymax=y3,
fill=group,color=group),
alpha=0.2)+
geom_line...1元获取,打赏如果没有收到示例数据和代码的下载链接可以加我的微信mingyan24要