R 曲线下区域未按预期渲染

我已经用以下数据集和ggplot2创建了一个绘图

我从下面的链接下载了CSV格式的数据集

我使用的代码如下

 library(readr)
 library(ggplot2)
 library(plotly)

接下来，我从CSV文件创建数据帧

DF <- read_csv("C:/Users/mysystem/Desktop/Random3.csv")####Please set your working directory here

---

有没有办法避免这种情况。在某些情况下，阴影区域似乎会移动到曲线下的区域之外，在这种情况下，阴影区域似乎会移动到曲线的相反方向。我请人看一下。

我想你只是想要

geom\u区域

而不是

geom\u功能区

。还可以将第一个值设置为0，而不是跳过它，以防止生成的多边形具有反向填充

库（ggplot2）
图书馆（绘本）
这有帮助是的。但绿荫溢出的问题依然存在。这在本图表的其他版本中发生also@Raghavanvmvs我认为您只需要添加
position=“identity”
，因为默认情况下区域是堆叠的
p2<-ggplot(DF, aes(x=Col1, y=Col2, group=ID)) +
 geom_line(size=.5) +  geom_ribbon(data=subset(DF, Col1>1  ),aes(x=Col1,ymax=Col2, 
fill=ID),ymin=0,alpha=0.3 ) +
scale_fill_manual(name='Legend', values=c("green4",  "red"), labels=c("A", "B" ))+labs(x="Col1", 
y="Col2")+ xlim(0, 10000)+ theme_bw()# +theme(legend.position='none') 

ggplotly(p2)