geom_area的绘图区域中的空白

Question

我想基于因子变量“状态”来区分绘图颜色的区域。我使用fill = Status，但是，我在剧情区域看到了一个突破。关于如何避免这种情况的任何想法/建议，为什么会发生这种情况？

df1 <- data.frame(Date=seq(as.Date("2016/03/01"), as.Date("2016/03/10"), "day"), 
      Storypoints=c(8,14,16,23,28,35,40,44,46,55), 
      Status=c(rep("Completed",7), rep("Open",3))) 

ggplot(data=df1, mapping = aes(x = Date)) + 
geom_area(aes(y=Storypoints, fill=Status)) 

Answer 1

您可以使用宽度= 1的geom_bar以精确表示您的数据的连续区域图。

ggplot(data=df1, mapping = aes(x = Date)) + 
geom_bar(aes(y=Storypoints, fill=Status), stat="identity",width=1) 

Answer 2

我想这是因为ggplot无法确定，给它其状态该区域所属的，所以它的颜色。

我介绍了另一个状态，并给填充区域之间的另一个差距。

Answer 3

原因是在07年3月07日和08年3月之间没有数据点。并且由于间隙两侧的点不属于同一组，因此ggplot不会连接它们。简单地说，红色在3月07日结束，蓝色在08年3月开始，两者之间没有任何变化。

如果您对同一个图进行成像，但仅删除了间隙，则这意味着x轴应同时标记为08年3月和08年3月，其中两条曲线接触。

对此没有明显的解决方案，因为实际上没有数据可以绘制在间隙中。如果你想弥补差距，你必须做出决定并相应地修改你的数据。

可能作出的决定（但很可能不是一个很好的一个）是简单地增加一个数据点，使得读取区域填补了这个空白：

df1[11, "Date"] <- as.Date("2016-03-08") 
df1[11, "Storypoints"] <- 44 
df1[11, "Status"] <- "Completed" 
ggplot(data=df1, mapping = aes(x = Date)) + 
    geom_area(aes(y=Storypoints, fill=Status), pos = "identity") 

但随着问题这很清楚：我添加的数据点不应该存在，所以08年3月情节显示的内容实际上是误导性的。

我不确定是否有满意的解决方案。但也许别人有更好的主意。