-
Notifications
You must be signed in to change notification settings - Fork 0
113 lines (70 loc) · 4.86 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
---
title: "Fluglärmmonitoring Region Frauenfeld (Iselisberg TG) ab 2021"
author: "OGD-Koordinationsstelle Kanton Thurgau"
date: "`r Sys.Date()`"
output: html_document
---
```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```
## Open Government Data, provided by **Canton Thurgau**
*Autogenerated R starter code for dataset with the identifier* **dbu-gs-11**
# **Fluglärmmonitoring Region Frauenfeld (Iselisberg TG) ab 2021**
[Link to dataset on data.tg.ch](https://data.tg.ch/explore/dataset/dbu-gs-11/information/)
## Description
<p>Der vorliegende Datensatz beinhaltet die Resultate des Fluglärmmonitorings <span style='font-family: inherit; font-size: 0.875rem;'>Region Frauenfeld.</span></p><p><span style='font-weight: bolder;'>Die Daten wurden bisher pro Zeitintervall einzeln veröffentlicht und sin nun in diesem Datensatz zusammengefasst.</span><span style='font-family: inherit; font-size: 0.875rem;'><br></span></p><p> </p><p>Weil der Kanton Thurgau im An- und Abflugbereich des Flughafens Zürich liegt, hat das kantonale Departement für Bau und Umwelt die Sinus Engineering AG mit diesem lokalen Fluglärmmonitoring beauftragt. Die Messstation steht neben einer Wohnzone in Iselisberg (TG). Ausgewertet werden die Tagesstunden von 6 bis 22 Uhr (Tag), die sensiblen Nachtstunden von 22 bis 24 Uhr (1. Nachtstunde und 2. Nachtstunde) sowie der frühe Morgen von 5 bis 6 Uhr (letzte Nachtstunde). Die Lärmmessungen unterstützen die Behörden in den verschiedenen Verfahren rund um den Betrieb des Flughafens Zürich und dienen den Lärmbetroffenen als Information. Die Messungen werden monatlich auf <a href='https://dbu.tg.ch/downloads-services/fluglaermmonitoring.html/1452' target='_blank'>https://dbu.tg.ch</a> unter Downloads publiziert und in einem Jahresbericht zusammengefasst.</p><p><br></p><p><b>Hinweise:</b></p><p>Fehlende Messwerte können mehrere Gründe haben. In der Spalte Bemerkung sind diese angegeben. Sie lauten generell: Ungültig wegen Fremdlärm, <span style='font-family: inherit; font-size: 0.875rem;'>Ungültig wegen Windeinfluss, Ungültig wegen Technik</span></p><p>Des Weiteren gilt zu beachten, dass Werte in der Spalte <span style='font-weight: bolder;'>leq_gesamtlärm</span> durch Fremdlärm oder Windgeräusche an diesem Tag stark beeinflusst sein können und in den PDF Berichten daher nicht in der Monatsmittelwertbildung berücksichtigt werden. Derzeit ist es technisch nicht möglich, diese Werte in den OGD-Daten zu kennzeichnen, weshalb zur Überprüfung die Berichte unter <a href='https://dbu.tg.ch/downloads-services/fluglaermmonitoring.html/1452' style='text-decoration: none; color: rgb(40, 154, 215);' target='_blank'>https://dbu.tg.ch/downloads-services/fluglaermmonitoring.html/1452</a> beachtet werden müssen.</p>
## Metadata
- **Issued** : 2019-06-16
- **Modified** : 2024-11-13 08:27:10
- **Rights** : CC By 4.0
- **Keywords** : Balterswil , Dezibel , Fluglärm, Fluglärmmonitoring, Hinterthurgau , Lärmschutz, Lärmschutzverordnung, Monitoring , Umweltschutz
## Load Packages
Every dataset (csv and geodata) on [data.tg.ch](https://data.tg.ch/pages/start/) can be retrieved with the **tgAPI** package. You can download it via [GitHub](https://github.com/ogdtg/tgAPI). Please note that the package has some dependencies, which can result in a lengthy installation process. Therefore, we do not recommend installing the package directly in Google Colab. However, if you intend to run this code on your local machine, we strongly recommend installing the tgAPI package.
```{r}
library(httr)
library(jsonlite)
library(dplyr)
# library(remotes)
# remotes::install.github("ogdtg/tgAPI")
```
## Download Data
```{r}
# Download the Dataset via API
res <- httr::GET("https://data.tg.ch/api/explore/v2.0/catalog/datasets/dbu-gs-11/exports/json")
data <- res$content %>%
rawToChar() %>%
jsonlite::fromJSON()
# Use tgAPI
# data <- tgAPI::get_dataset("dbu-gs-11")
head(data)
```
## Explore Metadata
```{r}
res <- httr::GET("https://data.tg.ch/api/explore/v2.0/catalog/datasets/dbu-gs-11")
metadata <- res$content %>%
rawToChar() %>%
jsonlite::fromJSON()
# Fields name
cat("\nFields name")
metadata$dataset$fields$name
# Fields description
cat("\nFields description")
metadata$dataset$fields$description
# Fields data type
cat("\nFields data type")
metadata$dataset$fields$type
```
## Analyze data
```{r}
# Look at the dataset and its structure
summary(data)
```
## Continue your code here...
```{r}
# Do some data magic with R
```
------------------------------------------------------------------------
## Questions about the data?
Contact us via [Mail](mailto:[email protected]) or visit our [GitHub presence](https://github.com/ogdtg)
------------------------------------------------------------------------
OGD-Koordinationsstelle Kanton Thurgau | Grabenstrasse 8 | 8510 Frauenfeld