Develop

lang/translation.json

@@ -43,6 +43,10 @@
 	      "en": "More information about the measurements from KNMI can be found on:",
 	      "nl": "Meer informatie over de metingen van het KNMI kun je vinden op:"
 	 	  },
+	 	  {"tag" : "expl_link_to_openair",
+	      "en": "More information about the openair package can be found on:",
+	      "nl": "Meer informatie over het openair-package kun je vinden op:"
+	 	  },
 	  {"tag" : "expl_link_to_projecten",
 	      "en": "For more information on the projects themselves, see our website:",
 	      "nl": "Voor meer informatie over de projecten zelf, zie onze website:"
@@ -420,8 +424,8 @@
         "nl": "In deze kalender zie je de gemiddelde fijnstofconcentratie per dag voor alle geselecteerde sensoren samen. De pijltjes geven de  windrichting aan."
       },
       {"tag" : "expl_calplot_expl",
-        "en": "If you click on a sensor, an average concentration per day is calculated. This can be displayed in a graph or, as shown here, in a calender representation. The color assigned to each date corresponds to an average value. This may reveal a pattern. For example, it could be observed that on weekdays (Monday to Friday) the measurements are consistently slightly higher than on weekends.",
-        "nl": "Voor alle geslecteerde sensoren is de gemiddelde fijnstofconcentratie per dag berekend. Deze kan worden weergegeven in een grafiek of, zoals hier, in een kalender. De kleur die elke datum krijgt, correspondeert met een gemiddelde waarde. Het kan zijn dat er zo een patroon zichtbaar wordt. Zo kunnen bijvoorbeeld op de weekdagen (maandag t/m vrijdag) de meetwaarden altijd net wat hoger zijn dan op de weekenddagen. De pijltjes geven de windrichting aan."
+        "en": "If you click on a sensor, an average concentration per day is calculated. This can be displayed in a graph or, as shown here, in a calender representation. The color assigned to each date corresponds to an average value. This may reveal a pattern. For example, it could be observed that on weekdays (Monday to Friday) the measurements are consistently slightly higher than on weekends. Created using openair: Carslaw, D. C. and K. Ropkins, (2012) openair --- an R package for air quality data analysis. Environmental Modelling & Software. Volume 27-28, 52-61.",
+        "nl": "Voor alle geslecteerde sensoren is de gemiddelde fijnstofconcentratie per dag berekend. Deze kan worden weergegeven in een grafiek of, zoals hier, in een kalender. De kleur die elke datum krijgt, correspondeert met een gemiddelde waarde. Het kan zijn dat er zo een patroon zichtbaar wordt. Zo kunnen bijvoorbeeld op de weekdagen (maandag t/m vrijdag) de meetwaarden altijd net wat hoger zijn dan op de weekenddagen. De pijltjes geven de windrichting aan. Gemaakt met openair: Carslaw, D. C. and K. Ropkins, (2012) openair --- an R package for air quality data analysis. Environmental Modelling & Software. Volume 27-28, 52-61."
       },
       {"tag" : "word_conc_rose",
         "en": "Concentration rose (%)",
@@ -432,8 +436,8 @@
         "nl": "Om een beeld te krijgen van waar de fijn stof vandaan komt, is de fijnstofconcentratie gecombineerd met de winddata van het KNMI."
       },
       {"tag" : "expl_concplot%_expl",
-        "en": "Here a weighted concentration rose plot is displayed. This figure shows the percentage contribution of each wind direction to the total average concentration. The average concentration per wind direction is weighted based on the frequency of occurrence. For example, if there is a triangle located in the bottom left of the gray line with a 15% value and a large light fill area along with a very small dark fill area, it means that the wind blows from the southwest approximately 15% of the time, mostly bringing low concentrations (light fill) and occasionally high concentrations (dark fill).",
-        "nl": "Hier zie je een gewogen concentratieroos. Deze toont per windrichting het aandeel (in %) van deze windrichting in de totale gemiddelde fijnstofconcentratie. De gemiddelde concentratie per windrichting wordt hiervoor gewogen naar hoe vaak deze windrichting voorkomt. Voorbeeld: als er linksonder een driehoek ligt op de grijze lijn met 15% met een grote lichte vulling en een hele kleine donkere vulling, betekent dit dat de wind zo'n 15% van de tijd uit het zuidwesten waait en grotedeels lage concentraties (lichte vulling) brengt en slechts af en toe een hoge concentratie (donkere vulling)."
+        "en": "Here a weighted concentration rose plot is displayed. This figure shows the percentage contribution of each wind direction to the total average concentration. The average concentration per wind direction is weighted based on the frequency of occurrence. For example, if there is a triangle located in the bottom left of the gray line with a 15% value and a large light fill area along with a very small dark fill area, it means that the wind blows from the southwest approximately 15% of the time, mostly bringing low concentrations (light fill) and occasionally high concentrations (dark fill). Created using openair: Carslaw, D. C. and K. Ropkins, (2012) openair --- an R package for air quality data analysis. Environmental Modelling & Software. Volume 27-28, 52-61.",
+        "nl": "Hier zie je een gewogen concentratieroos. Deze toont per windrichting het aandeel (in %) van deze windrichting in de totale gemiddelde fijnstofconcentratie. De gemiddelde concentratie per windrichting wordt hiervoor gewogen naar hoe vaak deze windrichting voorkomt. Voorbeeld: als er linksonder een driehoek ligt op de grijze lijn met 15% met een grote lichte vulling en een hele kleine donkere vulling, betekent dit dat de wind zo'n 15% van de tijd uit het zuidwesten waait en grotedeels lage concentraties (lichte vulling) brengt en slechts af en toe een hoge concentratie (donkere vulling). Gemaakt met openair: Carslaw, D. C. and K. Ropkins, (2012) openair --- an R package for air quality data analysis. Environmental Modelling & Software. Volume 27-28, 52-61."
       },
     {"tag" : "expl_add_sensor_to_group",
         "en": "The selected sensors will be added to group:",

modules/add_calenderplot.R

@@ -69,7 +69,7 @@ calender_server <- function(id,
       data_calender <- dplyr::left_join(data_calender, knmidata, by = 'date')
 
       # Make a plot ====
-      try(calendarPlot(data_calender, pollutant = "value", annotate = "ws",
+      try(openair::calendarPlot(data_calender, pollutant = "value", annotate = "ws",
                        type = 'label',
                        local.tz = "Europe/Amsterdam",
                        cols = "Oranges",

modules/add_info_sensor_plot.R

@@ -63,7 +63,7 @@ info_sensor_server <- function(id,
 
 
       # Make a plot ====
-      try(calendarPlot(data_calender, pollutant = "count_stations",
+      try(openair::calendarPlot(data_calender, pollutant = "count_stations",
                        type = 'label',
                        local.tz = "Europe/Amsterdam",
                        cols = c("#fff4dc","#ffe9b7","#ffb612","#c58800"),

modules/add_pollutionrose_plot.R

@@ -69,7 +69,7 @@ pollrose_server <- function(id,
       data_pollrose <- dplyr::left_join(data_pollrose, knmidata, by = 'date')
 
       # Make a plot ====
-      try(pollutionRose(data_pollrose,
+      try(openair::pollutionRose(data_pollrose,
                         pollutant = "value",
                         wd = "wd",
                         ws = "ws",

ui.R

@@ -275,6 +275,8 @@ shinyUI(
         a("luchtmeetnet.nl", href ='https://www.luchtmeetnet.nl/', target = 'blank'),
         br(),i18n$t("expl_link_to_KNMI"),
         a("knmi.nl", href ='https://www.knmi.nl/', target = 'blank'),
+        br(),i18n$t("expl_link_to_openair"),
+        a("openair", href ='https://davidcarslaw.github.io/openair/', target = 'blank'),
         br(),
         i18n$t("expl_link_to_projecten"),
         a("samenmeten.nl/initiatieven", href ='https://www.samenmeten.nl/initiatieven', target = 'blank'),