r - 如何从面积图中删除空白（geom_area）

Question

我在 data.frame 中有以下数据：

variante   data  número de casos
P.1       nov/20    2
P.2       nov/20    96
N.9       nov/20    2
P.1       dez/20    1
P.2       dez/20    93 
B.1.1.7    dez/20   1
N.9        dez/20   5
P.1       jan/21    19
P.2       jan/21    67
B.1.1.7   jan/21    8
N.9        jan/21   6
P.1        fev/21   31
P.2        fev/21   58
B.1.1.7    fev/21   5
B.1.525    fev/21   1
N.9        fev/21   5
P.1        mar/21   46
P.2        mar/21   45
B.1.1.7    mar/21   5
B.1.351    mar/21   1
N.9        mar/21   3
P.1        abr/21   63
P.2        abr/21   32
B.1.1.7    abr/21   4
B.1.351    abr/21   1 

我想使用以下代码创建一个分层（堆叠）区域图：

ggplot(porcent2) +
  aes(x = data, y = `número de casos`, fill = variantes, colour = variantes)+
  geom_area(position="fill") +
  labs(x = "Meses", y = "Frequência da variante", subtitle = "Avanço de Variantes no Brasil") +
  scale_fill_hue() +
  scale_color_hue() +
  theme_bw()

但是我得到的结果在层之间的某些地方有奇怪的空白：

我发现了这个问题，但这并没有使用与我相同的代码。

有谁知道我该如何解决这个问题？

标签： rggplot2geom-area