Я пытаюсь построить линейный график ggplot, но получаю странную линию, когда добавляю переменную color
: код, который я использую:
df %>%
ggplot(aes(x = date, y = value)) +
geom_line(aes(color = as.factor(myColor))) +
facet_wrap(~myFacet) +
geom_vline(xintercept = as.Date("2016-11-30"), size= 1) +
geom_vline(xintercept = as.Date("2017-11-30"), size = 1) +
geom_vline(xintercept = as.Date("2018-11-30"), size = 1) +
theme_minimal()
Однако, когда я запускаю следующее(удаляя переменную цвета) Я получаю правильные результаты.
df %>%
ggplot(aes(x = date, y = value)) +
geom_line() +
facet_wrap(~myFacet) +
geom_vline(xintercept = as.Date("2016-11-30"), size= 1) +
geom_vline(xintercept = as.Date("2017-11-30"), size = 1) +
geom_vline(xintercept = as.Date("2018-11-30"), size = 1) +
theme_minimal()
Правильный график:

Неправильный график:

Линия, на которую я ссылаюсь, это прямая линия на части зеленого цвета графика и части синего цвета графика (2018и 2019 соответственно)
Данные выглядят следующим образом:
# A tibble: 26,304 x 3
date value myFacet
<date> <dbl> <chr>
1 2016-09-01 40 some text
2 2016-09-02 69 some text
3 2016-09-03 69 some text
4 2016-09-04 64 some text
5 2016-09-05 80 some text
6 2016-09-06 79 some text
7 2016-09-07 75 some text
8 2016-09-08 53 some text
9 2016-09-09 44 some text
10 2016-09-10 53 some text
# ... with 26,294 more rows
Данные слишком велики для обработки данных.