Я делаю линейную диаграмму с областями. Они не складываются, потому что они не располагаются поверх каждой из других линий.

Линия и область не совпадают. Я хочу показать две группы на одной линейной диаграмме.

Это мой код

economics_long %>% 
  filter(variable %in% c("unemploy", "pop")) %>%
  ggplot(aes(date, value, group = variable,
             fill = variable, color = variable)) +
  geom_area(alpha = 0.4) +
  geom_line(size = 1) 

Красная линия не совпадает с верхней частью красной области.

0
Cauder 18 Окт 2020 в 18:27

1 ответ

Лучший ответ

Может быть, это то, что вы ищете:

library(ggplot2)
#Code
economics_long %>% 
  filter(variable %in% c("unemploy", "pop")) %>%
  ggplot(aes(date, value, group = variable,
             fill = variable, color = variable)) +
  geom_area(alpha = 0.4,size=1)

Выход:

enter image description here

Или это:

#Code 2
economics_long %>% 
  filter(variable %in% c("unemploy", "pop")) %>%
  ggplot(aes(date, value, group = variable,
             fill = variable, color = variable)) +
  geom_line(size=1)+
  geom_area(alpha = 0.4,size=1,position='identity')

Выход:

enter image description here

Или этот стиль стека:

#Code 3
economics_long %>% 
  filter(variable %in% c("unemploy", "pop")) %>%
  ggplot(aes(date, value, group = variable,
             fill = variable, color = variable)) +
  geom_line(size=1,position='stack')+
  geom_area(alpha = 0.4,size=1,position='stack')

Выход:

enter image description here

2
Duck 18 Окт 2020 в 15:36