-1

I have a dataset in which I want to plot the measurements of a substance at different locations over time over time. this works with a simple line plot. However, I have some moments in my data when no measurements were executed these moments I want the lines to break. I have added some dates with NA values. However it does not present break.

The code goes like this:

chloride <- subset(df, Parameter == "chloride - nf - mg/l")
ggplot(data = chloride2, aes(x = Datum, y = as.numeric(as.factor(Waarden)))) +
  geom_line(aes(color = Locatie), lwd = 1) +
  labs(x = "Datum", y = "Chloride (mg/l)") +
  scale_color_manual(values = c("navy", "darkslategray4", "orange", "yellowgreen", "cornflowerblue", "firebrick")) +
  theme_bw() +
  theme(text = element_text(size = 16), legend.position = "top") +
  scale_y_continuous(limits = c(0, 220)) +
  geom_hline(yintercept = 200, linetype = "dashed") +
  scale_x_date(date_breaks = ("1 year"), labels = date_format("%m/%Y"))

I have tried it with another substance here only one location was included tried this code

extinction <- subset(df, Parameter == "Extinctie")
every.year <- data.frame(Datum = seq(min(extinction$Datum), max(extinction$Datum), by = "1 year"))
extinction2 <- merge(extinction, every.year, all = TRUE)

ggplot(data = extinction2, aes(x = Datum, y = Waarden)) +
  geom_line(color = "steelblue", lwd = 1) +
  labs(y = "Extinctie-waarden", x = "Datum") +
  theme_bw() +
  theme(text = element_text(size = 16)) +
  scale_y_continuous(limit = c(0, 15)) +
  scale_x_date(date_breaks = ("3 month"), labels = date_format("%m/%Y"))

This worked.

it seems like it does not present a break because of the different locations

    Datum            Parameter Waarden                                      Locatie
1   2016-02-08 chloride - nf - mg/l    89.0                    Waterskivijver Wollebrand
2   2016-04-26 chloride - nf - mg/l    93.0                    Waterskivijver Wollebrand
3   2016-05-24 chloride - nf - mg/l    81.0                    Waterskivijver Wollebrand
4   2016-06-16 chloride - nf - mg/l    74.0                    Waterskivijver Wollebrand
5   2016-06-16 chloride - nf - mg/l    62.0                   Wollebrand_Inlaat zwemplas
6   2016-06-16 chloride - nf - mg/l    70.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
7   2016-06-16 chloride - nf - mg/l    63.0                veilingroute_bovenstroom stuw
8   2016-06-16 chloride - nf - mg/l    59.0                          Strijp_inlaat FLORA
9   2016-06-21 chloride - nf - mg/l    51.0                    Waterskivijver Wollebrand
10  2016-06-28 chloride - nf - mg/l    45.0                    Waterskivijver Wollebrand
11  2016-06-28 chloride - nf - mg/l    33.0                   Wollebrand_Inlaat zwemplas
12  2016-06-28 chloride - nf - mg/l    36.0                          Strijp_inlaat FLORA
13  2016-06-28 chloride - nf - mg/l    47.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
14  2016-06-28 chloride - nf - mg/l    82.0                veilingroute_bovenstroom stuw
15  2016-07-08 chloride - nf - mg/l    46.0                   Wollebrand_Inlaat zwemplas
16  2016-07-08 chloride - nf - mg/l    54.0                    Waterskivijver Wollebrand
17  2016-07-08 chloride - nf - mg/l    46.0                veilingroute_bovenstroom stuw
18  2016-07-08 chloride - nf - mg/l    42.0                          Strijp_inlaat FLORA
19  2016-07-11 chloride - nf - mg/l    63.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
20  2016-07-19 chloride - nf - mg/l    68.0                    Waterskivijver Wollebrand
21  2016-07-19 chloride - nf - mg/l    65.0                   Wollebrand_Inlaat zwemplas
22  2016-07-19 chloride - nf - mg/l    72.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
23  2016-07-19 chloride - nf - mg/l    53.0                veilingroute_bovenstroom stuw
24  2016-07-19 chloride - nf - mg/l    45.0                          Strijp_inlaat FLORA
25  2016-08-01 chloride - nf - mg/l    54.0                   Wollebrand_Inlaat zwemplas
26  2016-08-01 chloride - nf - mg/l    65.0                    Waterskivijver Wollebrand
27  2016-08-01 chloride - nf - mg/l    62.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
28  2016-08-01 chloride - nf - mg/l    45.0                veilingroute_bovenstroom stuw
29  2016-08-01 chloride - nf - mg/l    48.0                          Strijp_inlaat FLORA
30  2016-08-16 chloride - nf - mg/l    61.0                    Waterskivijver Wollebrand
31  2016-08-16 chloride - nf - mg/l    61.0                    Waterskivijver Wollebrand
32  2016-08-16 chloride - nf - mg/l    58.0                   Wollebrand_Inlaat zwemplas
33  2016-08-16 chloride - nf - mg/l    62.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
34  2016-08-16 chloride - nf - mg/l    57.0                veilingroute_bovenstroom stuw
35  2016-08-16 chloride - nf - mg/l    56.0                          Strijp_inlaat FLORA
36  2016-08-30 chloride - nf - mg/l    48.0                    Waterskivijver Wollebrand
37  2016-09-02 chloride - nf - mg/l    58.0                          Strijp_inlaat FLORA
38  2016-09-02 chloride - nf - mg/l    51.0                    Waterskivijver Wollebrand
39  2016-09-02 chloride - nf - mg/l    54.0                   Wollebrand_Inlaat zwemplas
40  2016-09-02 chloride - nf - mg/l    56.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
41  2016-09-02 chloride - nf - mg/l    60.0                veilingroute_bovenstroom stuw
42  2016-09-13 chloride - nf - mg/l    64.0                    Waterskivijver Wollebrand
43  2016-09-15 chloride - nf - mg/l    68.0                    Waterskivijver Wollebrand
44  2016-09-15 chloride - nf - mg/l    76.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
45  2016-09-15 chloride - nf - mg/l    72.0                   Wollebrand_Inlaat zwemplas
46  2016-09-15 chloride - nf - mg/l    75.0                veilingroute_bovenstroom stuw
47  2016-09-15 chloride - nf - mg/l    72.0                          Strijp_inlaat FLORA
48  2016-09-30 chloride - nf - mg/l    75.0                    Waterskivijver Wollebrand
49  2016-09-30 chloride - nf - mg/l    74.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
50  2016-09-30 chloride - nf - mg/l    63.0                   Wollebrand_Inlaat zwemplas
51  2016-09-30 chloride - nf - mg/l    68.0                veilingroute_bovenstroom stuw
52  2016-09-30 chloride - nf - mg/l    71.0                          Strijp_inlaat FLORA
53  2016-10-10 chloride - nf - mg/l    75.0                    Waterskivijver Wollebrand
54  2016-10-10 chloride - nf - mg/l    74.0                   Wollebrand_Inlaat zwemplas
55  2016-10-10 chloride - nf - mg/l    76.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
56  2016-10-10 chloride - nf - mg/l    76.0                veilingroute_bovenstroom stuw
57  2016-10-10 chloride - nf - mg/l    74.0                          Strijp_inlaat FLORA
58  2016-10-25 chloride - nf - mg/l    70.0                    Waterskivijver Wollebrand
59  2016-10-25 chloride - nf - mg/l    66.0                   Wollebrand_Inlaat zwemplas
60  2016-10-25 chloride - nf - mg/l    64.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
61  2016-10-25 chloride - nf - mg/l    65.0                veilingroute_bovenstroom stuw
62  2016-10-25 chloride - nf - mg/l    67.0                          Strijp_inlaat FLORA
63  2016-11-07 chloride - nf - mg/l    60.0                    Waterskivijver Wollebrand
64  2016-11-14 chloride - nf - mg/l    62.0                    Waterskivijver Wollebrand
65  2016-11-14 chloride - nf - mg/l    52.0                   Wollebrand_Inlaat zwemplas
66  2016-11-14 chloride - nf - mg/l    60.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
67  2016-11-14 chloride - nf - mg/l    63.0                veilingroute_bovenstroom stuw
68  2016-11-14 chloride - nf - mg/l    52.0                          Strijp_inlaat FLORA
69  2016-12-20 chloride - nf - mg/l    76.0                    Waterskivijver Wollebrand
70  2016-12-20 chloride - nf - mg/l    84.0                   Wollebrand_Inlaat zwemplas
71  2016-12-20 chloride - nf - mg/l    83.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
72  2016-12-20 chloride - nf - mg/l    93.0                veilingroute_bovenstroom stuw
73  2016-12-20 chloride - nf - mg/l    97.0                          Strijp_inlaat FLORA
74  2017-01-13 chloride - nf - mg/l   103.0                    Waterskivijver Wollebrand
75  2017-01-13 chloride - nf - mg/l    49.2                   Wollebrand_Inlaat zwemplas
76  2017-01-13 chloride - nf - mg/l    68.2 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
77  2017-01-13 chloride - nf - mg/l    60.8                veilingroute_bovenstroom stuw
78  2017-01-13 chloride - nf - mg/l    61.7                          Strijp_inlaat FLORA
79  2017-02-08                 <NA>      NA                                         <NA>
80  2017-02-13 chloride - nf - mg/l    73.4                          Strijp_inlaat FLORA
81  2017-02-13 chloride - nf - mg/l    99.5                    Waterskivijver Wollebrand
82  2017-02-13 chloride - nf - mg/l   133.0                   Wollebrand_Inlaat zwemplas
83  2017-02-13 chloride - nf - mg/l   110.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
84  2017-02-13 chloride - nf - mg/l    99.1                veilingroute_bovenstroom stuw
85  2017-03-07 chloride - nf - mg/l    95.7                    Waterskivijver Wollebrand
86  2017-03-09 chloride - nf - mg/l    55.3                   Wollebrand_Inlaat zwemplas
87  2017-03-09 chloride - nf - mg/l    74.5 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
88  2017-03-09 chloride - nf - mg/l    71.7                veilingroute_bovenstroom stuw
89  2017-03-09 chloride - nf - mg/l    64.3                          Strijp_inlaat FLORA
90  2017-04-04 chloride - nf - mg/l    99.1                   Wollebrand_Inlaat zwemplas
91  2017-04-04 chloride - nf - mg/l   111.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
92  2017-04-04 chloride - nf - mg/l   101.0                veilingroute_bovenstroom stuw
93  2017-04-04 chloride - nf - mg/l    91.2                          Strijp_inlaat FLORA
94  2017-04-25 chloride - nf - mg/l   107.0                    Waterskivijver Wollebrand
95  2017-05-02 chloride - nf - mg/l   111.0                   Wollebrand_Inlaat zwemplas
96  2017-05-02 chloride - nf - mg/l   123.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
97  2017-05-02 chloride - nf - mg/l   143.0                veilingroute_bovenstroom stuw
98  2017-05-02 chloride - nf - mg/l   132.0                          Strijp_inlaat FLORA
99  2017-05-02 chloride - nf - mg/l   113.0       Waterskivijver Wollebrand steiger-vlot
100 2017-05-23 chloride - nf - mg/l   147.0                    Waterskivijver Wollebrand
101 2017-06-06 chloride - nf - mg/l   100.0                   Wollebrand_Inlaat zwemplas
102 2017-06-06 chloride - nf - mg/l   147.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
103 2017-06-06 chloride - nf - mg/l    99.0                veilingroute_bovenstroom stuw
104 2017-06-06 chloride - nf - mg/l    88.2                          Strijp_inlaat FLORA
105 2017-06-06 chloride - nf - mg/l   144.0       Waterskivijver Wollebrand steiger-vlot
106 2017-06-20 chloride - nf - mg/l   127.0                    Waterskivijver Wollebrand
107 2017-07-05 chloride - nf - mg/l   105.0                   Wollebrand_Inlaat zwemplas
108 2017-07-05 chloride - nf - mg/l   103.0 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
109 2017-07-05 chloride - nf - mg/l   106.0                veilingroute_bovenstroom stuw
110 2017-07-05 chloride - nf - mg/l    84.3                          Strijp_inlaat FLORA
111 2017-07-05 chloride - nf - mg/l   118.0       Waterskivijver Wollebrand steiger-vlot
112 2017-07-18 chloride - nf - mg/l    92.9                    Waterskivijver Wollebrand
113 2017-08-03 chloride - nf - mg/l    72.1                   Wollebrand_Inlaat zwemplas
114 2017-08-03 chloride - nf - mg/l    65.4 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
115 2017-08-03 chloride - nf - mg/l    63.3                veilingroute_bovenstroom stuw
116 2017-08-03 chloride - nf - mg/l    72.7                          Strijp_inlaat FLORA
117 2017-08-03 chloride - nf - mg/l    84.2       Waterskivijver Wollebrand steiger-vlot
118 2017-08-15 chloride - nf - mg/l    85.4                    Waterskivijver Wollebrand
119 2017-09-05 chloride - nf - mg/l    70.9                veilingroute_bovenstroom stuw
120 2017-09-05 chloride - nf - mg/l    68.6       Waterskivijver Wollebrand steiger-vlot
121 2017-09-05 chloride - nf - mg/l    63.1                   Wollebrand_Inlaat zwemplas
122 2017-09-05 chloride - nf - mg/l    66.8 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
123 2017-09-05 chloride - nf - mg/l    55.5                          Strijp_inlaat FLORA
124 2017-09-12 chloride - nf - mg/l    52.5                    Waterskivijver Wollebrand
125 2017-10-05 chloride - nf - mg/l    39.2                   Wollebrand_Inlaat zwemplas
126 2017-10-05 chloride - nf - mg/l    33.3                veilingroute_bovenstroom stuw
127 2017-10-05 chloride - nf - mg/l    37.5                          Strijp_inlaat FLORA
128 2017-10-05 chloride - nf - mg/l    66.5       Waterskivijver Wollebrand steiger-vlot
129 2017-10-31 chloride - nf - mg/l    81.3 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
130 2017-11-09 chloride - nf - mg/l    70.5                   Wollebrand_Inlaat zwemplas
131 2017-11-09 chloride - nf - mg/l    82.6 hoofdwatergang_Lange Broekweg nr 78 (?)_tuin
132 2017-11-09 chloride - nf - mg/l    72.0                veilingroute_bovenstroom stuw
133 2017-11-09 chloride - nf - mg/l    66.3                          Strijp_inlaat FLORA
134 2017-11-09 chloride - nf - mg/l    85.8       Waterskivijver Wollebrand steiger-vlot
135 2017-11-16 chloride - nf - mg/l    85.9       Waterskivijver Wollebrand steiger-vlot
136 2017-12-06 chloride - nf - mg/l    75.9                   Wollebrand_Inlaat zwemplas
137 2017-12-06 chloride - nf - mg/l    68.7                veilingroute_bovenstroom stuw
138 2017-12-06 chloride - nf - mg/l    58.5                          Strijp_inlaat FLORA
139 2017-12-06 chloride - nf - mg/l    86.9       Waterskivijver Wollebrand steiger-vlot
140 2018-02-08                 <NA>      NA                                         <NA>
141 2019-01-08 chloride - nf - mg/l   131.0                    Waterskivijver Wollebrand
142 2019-02-08                 <NA>      NA                                         <NA>
143 2019-02-18 chloride - nf - mg/l   141.0                    Waterskivijver Wollebrand
144 2019-02-26 chloride - nf - mg/l   142.0                    Waterskivijver Wollebrand
145 2019-04-26 chloride - nf - mg/l    86.6                   Wollebrand_Inlaat zwemplas
146 2019-04-30 chloride - nf - mg/l   115.0                    Waterskivijver Wollebrand
147 2019-05-14 chloride - nf - mg/l   121.0                    Waterskivijver Wollebrand
148 2019-05-23 chloride - nf - mg/l   115.0                   Wollebrand_Inlaat zwemplas
149 2019-05-28 chloride - nf - mg/l   117.0                    Waterskivijver Wollebrand
150 2019-05-28 chloride - nf - mg/l   113.0                    Waterskivijver Wollebrand
151 2019-06-12 chloride - nf - mg/l    96.7                    Waterskivijver Wollebrand
152 2019-06-25 chloride - nf - mg/l    91.3                    Waterskivijver Wollebrand
153 2019-06-25 chloride - nf - mg/l    88.2                   Wollebrand_Inlaat zwemplas
154 2019-07-09 chloride - nf - mg/l   101.0                    Waterskivijver Wollebrand
155 2019-07-11 chloride - nf - mg/l    89.3                   Wollebrand_Inlaat zwemplas
156 2019-07-23 chloride - nf - mg/l    92.1                    Waterskivijver Wollebrand
157 2019-08-06 chloride - nf - mg/l    85.6                    Waterskivijver Wollebrand
158 2019-08-20 chloride - nf - mg/l    75.2                    Waterskivijver Wollebrand
159 2019-08-20 chloride - nf - mg/l    76.4                    Waterskivijver Wollebrand
160 2019-08-26 chloride - nf - mg/l    91.6                   Wollebrand_Inlaat zwemplas
161 2019-09-03 chloride - nf - mg/l    89.9                    Waterskivijver Wollebrand
162 2019-09-17 chloride - nf - mg/l    84.9                    Waterskivijver Wollebrand
163 2019-09-24 chloride - nf - mg/l    92.7                    Waterskivijver Wollebrand
164 2019-09-26 chloride - nf - mg/l    68.9                   Wollebrand_Inlaat zwemplas
165 2019-10-30 chloride - nf - mg/l   109.0                   Wollebrand_Inlaat zwemplas
166 2019-11-07 chloride - nf - mg/l    94.5                    Waterskivijver Wollebrand
167 2019-11-29 chloride - nf - mg/l    82.9                   Wollebrand_Inlaat zwemplas
168 2019-12-24 chloride - nf - mg/l   100.0                   Wollebrand_Inlaat zwemplas
> 



  [1]: https://i.stack.imgur.com/mjB6G.png
Hovercraft Full Of Eels
  • 283,665
  • 25
  • 256
  • 373
  • 2
    Hi Anna, welcome to SO. Please always provide some reproducible data. You can find more information [here](https://stackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example). Providing some reproducible data enable others to reproduce your problem and to find a solution. – fbeese Jun 30 '22 at 10:27
  • Hi Anna, thank you for adding sample data. Unfortunately, I do not think the sample you chose illustrates your problem. Your question mentions having `NA` values for `Datum` and different locations, but in your sample data there are no `NA` values for `Datum`, and the only `Locatie` value is `"Waterskivijver Wollebrand"`. Could you please share a different subset of data that better reflects your issues? – Gregor Thomas Jul 01 '22 at 11:40
  • It also seems like you want the plots to reflect a single substance, but your data includes `Parameter` values for many substances. Perhaps sharing sample data for only 1 `Parameter` would make sense. Something like `dput(subset(df, Parameter == "Extinctie")[1:20])` (though I obviously don't know if that would include `NA` dates and different locations--it's just a guess on my part.) – Gregor Thomas Jul 01 '22 at 11:42
  • Please don't deface your question, especially after it has been answered. – Hovercraft Full Of Eels Dec 18 '22 at 15:01

1 Answers1

1

Clarifying the question

Let's first create a somewhat minimal reproducible example for others to help you.

For the data frame:

df %>%
  filter(Datum > as.Date("2017-10-01")) %>%
  dput()

Resulting in this, which can be easily copy-pasted by others to recreate your data frame:

structure(list(Datum = structure(c(17444, 17444, 17444, 17444, 
17470, 17479, 17479, 17479, 17479, 17479, 17486, 17506, 17506, 
17506, 17506, 17570, 17904, 17935, 17945, 17953, 18012, 18016, 
18030, 18039, 18044, 18044, 18059, 18072, 18072, 18086, 18088, 
18100, 18114, 18128, 18128, 18134, 18142, 18156, 18163, 18165, 
18199, 18207, 18229, 18254), class = "Date"), Parameter = c("chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", NA, "chloride - nf - mg/l", 
NA, "chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l", "chloride - nf - mg/l", 
"chloride - nf - mg/l", "chloride - nf - mg/l"), Waarden = c(39.2, 
33.3, 37.5, 66.5, 81.3, 70.5, 82.6, 72, 66.3, 85.8, 85.9, 75.9, 
68.7, 58.5, 86.9, NA, 131, NA, 141, 142, 86.6, 115, 121, 115, 
117, 113, 96.7, 91.3, 88.2, 101, 89.3, 92.1, 85.6, 75.2, 76.4, 
91.6, 89.9, 84.9, 92.7, 68.9, 109, 94.5, 82.9, 100), Locatie = c("Wollebrand_Inlaat zwemplas", 
"veilingroute_bovenstroom stuw", "Strijp_inlaat FLORA", "Waterskivijver Wollebrand steiger-vlot", 
"hoofdwatergang_Lange Broekweg nr 78 (?)_tuin", "Wollebrand_Inlaat zwemplas", 
"hoofdwatergang_Lange Broekweg nr 78 (?)_tuin", "veilingroute_bovenstroom stuw", 
"Strijp_inlaat FLORA", "Waterskivijver Wollebrand steiger-vlot", 
"Waterskivijver Wollebrand steiger-vlot", "Wollebrand_Inlaat zwemplas", 
"veilingroute_bovenstroom stuw", "Strijp_inlaat FLORA", "Waterskivijver Wollebrand steiger-vlot", 
NA, "Waterskivijver Wollebrand", NA, "Waterskivijver Wollebrand", 
"Waterskivijver Wollebrand", "Wollebrand_Inlaat zwemplas", "Waterskivijver Wollebrand", 
"Waterskivijver Wollebrand", "Wollebrand_Inlaat zwemplas", "Waterskivijver Wollebrand", 
"Waterskivijver Wollebrand", "Waterskivijver Wollebrand", "Waterskivijver Wollebrand", 
"Wollebrand_Inlaat zwemplas", "Waterskivijver Wollebrand", "Wollebrand_Inlaat zwemplas", 
"Waterskivijver Wollebrand", "Waterskivijver Wollebrand", "Waterskivijver Wollebrand", 
"Waterskivijver Wollebrand", "Wollebrand_Inlaat zwemplas", "Waterskivijver Wollebrand", 
"Waterskivijver Wollebrand", "Waterskivijver Wollebrand", "Wollebrand_Inlaat zwemplas", 
"Wollebrand_Inlaat zwemplas", "Waterskivijver Wollebrand", "Wollebrand_Inlaat zwemplas", 
"Wollebrand_Inlaat zwemplas")), row.names = c(NA, -44L), class = "data.frame")

And we can reduce the problematic code to this:

chloride <- subset(df, Parameter == "chloride - nf - mg/l")
ggplot(data = chloride2, aes(x = Datum, y = as.numeric(as.factor(Waarden)))) +
  geom_line(aes(color = Locatie))

Problem

First of all, notice that you create a data frame chloride, but then plot chloride2.

Second, if we look at chloride, we'll see that there are no NAs in there. That is because we took a subset from df where Parameter == "chloride - nf - mg/l", whereas all your NA values in df also had NA for Parameter. Even if you didn't filter them out, ggplot wouldn't create breaks since Location wouldn't match any of the lines it's drawing. We need to add an NA to create a break for each Parameter and each Location.

Correcting just the first problem on our example dataset, we get this plot:enter image description here

Warning / note: I noticed you plot as.numeric(as.factor(Waarden))) on the y-axis, while the legend you used in the example implies raw values. Using the as.numeric(as.factor(...)) trick creates a ranking and I highly doubt that's what you want! Example:

> as.numeric(as.factor( c(12,12,13,14,13) ))
[1] 1 1 2 3 2

Solution

We need to add, either to chloride or to df, a row for each date+parameter+location combo where we want a break to occur.

I'll pick the skippable dates manually:

skip_dates <- as.Date(c("2017-02-08","2018-02-08","2019-02-08"))

We can generate the parameters and locations to skip on these dates:

skip_parameters <- unique(na.omit(df$Parameter))
skip_location <- unique(na.omit(df$Locatie))

Then we create a data frame of all permutations of these three criteria, and make sure the columns have the same names as those in df:

df_skip <- expand.grid(skip_dates, skip_parameters, skip_location)
colnames(df_skip) <- c("Datum","Parameter","Locatie")
df_skip$Waarden <- NA

Now we have in df_skip a single row for each combo we want to plot a break in:

example df_skip

Finally we add df_skip to the original df and run the plot again:

df <- rbind(df, df_skip)

chloride <- subset(df, Parameter == "chloride - nf - mg/l")
ggplot(data = chloride, aes(x = Datum, y = Waarden)) +
  geom_line(aes(color = Locatie))

solution plot

You'll get a warning about missing values, but since those are intentional we can ignore that.

Complete code
skip_dates <- as.Date(c("2017-02-08","2018-02-08","2019-02-08"))
skip_parameters <- unique(na.omit(df$Parameter))
skip_location <- unique(na.omit(df$Locatie))
df_skip <- expand.grid(skip_dates, skip_parameters, skip_location)
colnames(df_skip) <- c("Datum","Parameter","Locatie")
df_skip$Waarden <- NA
df <- rbind(df, df_skip)

chloride <- subset(df, Parameter == "chloride - nf - mg/l")
ggplot(data = chloride, aes(x = Datum, y = Waarden)) +
  geom_line(aes(color = Locatie))
Caspar V.
  • 1,782
  • 1
  • 3
  • 16