Skip to content
GitLab
Menu
Projects
Groups
Snippets
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
rglow
friendlyr
Commits
8980a15c
Commit
8980a15c
authored
Jul 10, 2020
by
Jean-Marie Lepioufle
Browse files
typo and case of synthaq in oslo
parent
ad7970c6
Changes
5
Hide whitespace changes
Inline
Side-by-side
vignettes/data.glb.arome.Rmd
View file @
8980a15c
---
title: "data.glb.
field
"
title: "data.glb.
arome
"
output: rmarkdown::html_vignette
vignette: >
%\VignetteIndexEntry{data.glb.
field
}
%\VignetteIndexEntry{data.glb.
arome
}
%\VignetteEngine{knitr::rmarkdown}
%\VignetteEncoding{UTF-8}
---
...
...
@@ -15,7 +15,7 @@ knitr::opts_chunk$set(collapse = T, comment = "#>")
```R
library("devtools")
devtools::install_git("https://git.nilu.no/rfriendlyr/friendlyr.git")
devtools::install_git("https://git.nilu.no/rfriendlyr/d.glb.
field
yr.git")
devtools::install_git("https://git.nilu.no/rfriendlyr/d.glb.
arom
yr.git")
```
## Get timeseries data
...
...
@@ -31,7 +31,7 @@ station_id <- c("Bygdin","Osensjøen")
element_id <- c("RR")
location <- NULL
df <- friendlyr::ts(service="d.glb.
field
yr",
df <- friendlyr::ts(service="d.glb.
arom
yr",
fromDate=fromDate,toDate=toDate,precision=timeResolution,timeResolution=timeResolution,
element_id=element_id,station_id=station_id)
...
...
@@ -40,6 +40,6 @@ df <- friendlyr::ts(service="d.glb.fieldyr",
## Get metadata
```R
metadata <- friendlyr::meta(service="d.glb.
field
yr",element_id=element_id,station_id=station_id)
metadata <- friendlyr::meta(service="d.glb.
arom
yr",element_id=element_id,station_id=station_id)
```
vignettes/data.glb.field.Rmd
View file @
8980a15c
---
title: "data.glb.
arome
"
title: "data.glb.
field
"
output: rmarkdown::html_vignette
vignette: >
%\VignetteIndexEntry{data.glb.
arome
}
%\VignetteIndexEntry{data.glb.
field
}
%\VignetteEngine{knitr::rmarkdown}
%\VignetteEncoding{UTF-8}
---
...
...
@@ -15,7 +15,7 @@ knitr::opts_chunk$set(collapse = T, comment = "#>")
```R
library("devtools")
devtools::install_git("https://git.nilu.no/rfriendlyr/friendlyr.git")
devtools::install_git("https://git.nilu.no/rfriendlyr/d.glb.
arom
yr.git")
devtools::install_git("https://git.nilu.no/rfriendlyr/d.glb.
field
yr.git")
```
## Get timeseries data
...
...
@@ -31,7 +31,7 @@ station_id <- c("Bygdin","Osensjøen")
element_id <- c("RR")
location <- NULL
df <- friendlyr::ts(service="d.glb.
arom
yr",
df <- friendlyr::ts(service="d.glb.
field
yr",
fromDate=fromDate,toDate=toDate,precision=timeResolution,timeResolution=timeResolution,
element_id=element_id,station_id=station_id)
...
...
@@ -40,6 +40,6 @@ df <- friendlyr::ts(service="d.glb.aromyr",
## Get metadata
```R
metadata <- friendlyr::meta(service="d.glb.
arom
yr",element_id=element_id,station_id=station_id)
metadata <- friendlyr::meta(service="d.glb.
field
yr",element_id=element_id,station_id=station_id)
```
vignettes/data.glb.obs.Rmd
View file @
8980a15c
...
...
@@ -23,19 +23,12 @@ devtools::install_git("https://git.nilu.no/rfriendlyr/d.glb.obsyr.git")
Get data from eimet embedded dataset.
```R
fromDate="2008/03/01 02:00:00"
toDate="2008/03/01 09:00:00"
timeResolution="hourly"
station_id=c(1475,2175)
element_id=c("rain","temp")
location <- NULL
fromDate <- "2018/03/01 00:00:00"
toDate <- "2018/03/10 00:00:00"
timeResolution <- precision <- "daily"
station_id <- c("Bygdin","Eidsbugard","Bråtå")
station_id <- c("Osen","Nordre_Osa","Heggeriset_Nordstrand","Åkrestrømmen","Vauldalen","Stugudal","Aursunden","Ålen","Bygdin","Eidsbugard","Bråtå","Svanfoss","Skrukkelisj","Tryvann","Enebakk_Barbøla","Ukkestad")
element_id <- c("RR")
location <- NULL
...
...
vignettes/data.luftkval.oslo10.Rmd
View file @
8980a15c
---
title: "data.
eimet
"
title: "data.
luftkval.oslo10
"
output: rmarkdown::html_vignette
vignette: >
%\VignetteIndexEntry{data.eimet}
...
...
vignettes/data.synthaq.oslo10.Rmd
0 → 100644
View file @
8980a15c
---
title: "data.syntaq.oslo10.seed123"
output: rmarkdown::html_vignette
vignette: >
%\VignetteIndexEntry{data.eimet}
%\VignetteEngine{knitr::rmarkdown}
%\VignetteEncoding{UTF-8}
---
```{r setup, include = FALSE}
library(friendlyr)
knitr::opts_chunk$set(collapse = T, comment = "#>")
```
## install
```R
library("devtools")
devtools::install_git("https://git.nilu.no/rfriendlyr/friendlyr.git")
devtools::install_git("https://git.nilu.no/rfriendlyr/d.synthaq.oslyr.git")
```
## Get timeseries data
Get data from luftkval.oslo10 embedded dataset.
```R
fromDate="2015/03/01 02:00:00"
toDate="2015/03/01 09:00:00"
timeResolution="hourly"
station_id=c("7","464","827","665","9","11","163","504","809")
element_id=c("NO2")
location <- NULL
df <- friendlyr::ts(service="d.synthaq.oslyr",
fromDate=fromDate,toDate=toDate,precision=timeResolution,timeResolution=timeResolution,
element_id=element_id,station_id=station_id)
```
## Get metadata
```R
metadata <- friendlyr::meta(service="d.synthaq.oslyr",station_id=station_id)
```
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment