У меня есть data.frame с несколькими столбцами, записывающими значения по месяцам в году.
zdate mwe1.x mwe2.x mwe3.x mwe4.x mwe5.x mwe6.x mwe7.x mwe1.y mwe2.y
1 Jan 2017 10 0 1 0 0 4 0 41 5
2 Feb 2017 7 0 0 0 0 0 0 76 33
3 Mar 2017 16 0 0 0 0 6 0 261 59
4 Apr 2017 40 4 0 0 1 0 0 546 80
5 May 2017 8 0 0 0 1 4 0 154 18
6 Jun 2017 7 0 0 0 2 1 0 74 4
7 Jul 2017 20 0 0 0 0 1 0 116 8
8 Aug 2017 25 6 1 0 3 6 1 243 54
9 Sep 2017 8 2 2 0 3 5 0 257 46
10 Oct 2017 2 0 0 0 0 0 0 74 7
11 Nov 2017 13 0 0 0 1 0 0 144 9
12 Dec 2017 6 0 3 0 2 1 0 164 20
mwe3.y mwe4.y mwe5.y mwe6.y mwe7.y
1 17 4 11 4 28
2 61 0 22 7 72
3 91 1 69 16 309
4 71 0 94 19 206
5 29 0 44 3 58
6 21 0 15 2 66
7 12 0 23 2 20
8 20 0 36 2 55
9 42 0 55 7 89
10 13 0 24 0 7
11 39 0 18 1 11
12 54 0 88 5 51
Я хотел бы построить отдельные линейные диаграммы для этих столбцов, но с одной и той же осью x и уложить их друг на друга. Я пытаюсь использовать "ggplot2" и "facet_wrap" для этого, но я не могу понять, как именно это сделать. Я могу получить однострочный сюжет:
plot <- ggplot(all, aes(x = all$date, y = all$mwe1.x)) +
+ geom_line()
Но я хочу, чтобы это было совмещено с линейным графиком для mwe1.y прямо под ним. Кто-нибудь может мне помочь?