Заполнение области под линейным графиком в ggplot2: geom_area ()
Для данных:
def.percent period valence
1 6.4827843 1984-1985 neg
2 5.8232425 1985-1986 neg
3 -2.4003260 1986-1987 pos
4 -3.5994399 1987-1988 pos
Если я добавлю линию к точкам, как я могу использовать ggplot2, чтобы закрасить область под линией [geom_area ()] разными цветами для значений валентности «neg» и «pos»?
Я попробовал это:
ggplot(data, aes(x=period, y=def.percent, group = 1)) +
geom_area(aes(fill=valence)) +
geom_line() + geom_point() + geom_hline(yintercept=0)
Но R возвращает ошибку:
Error: Aesthetics can not vary with a ribbon
Этот же код работает для другого набора данных, я не понимаю, что здесь происходит, например:
library(gcookbook) # For the data set
cb <- subset(climate, Source=="Berkeley")
cb$valence[cb$Anomaly10y >= 0] <- "pos"
cb$valence[cb$Anomaly10y < 0] <- "neg"
ggplot(cb, aes(x=Year, y=Anomaly10y)) +
geom_area(aes(fill=valence)) +
geom_line() +
geom_hline(yintercept=0)