Commit ad7970c6 authored by Jean-Marie Lepioufle's avatar Jean-Marie Lepioufle
Browse files

add access to glb datasets

parent 0575ad08
---
title: "data.glb.field"
output: rmarkdown::html_vignette
vignette: >
%\VignetteIndexEntry{data.glb.field}
%\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.glb.fieldyr.git")
```
## Get timeseries data
Get data from eimet embedded dataset.
```R
fromDate <- "2018/03/01 00:00:00"
toDate <- "2018/03/10 00:00:00"
timeResolution <- precision <- "daily"
station_id <- c("Bygdin","Osensjøen")
element_id <- c("RR")
location <- NULL
df <- friendlyr::ts(service="d.glb.fieldyr",
fromDate=fromDate,toDate=toDate,precision=timeResolution,timeResolution=timeResolution,
element_id=element_id,station_id=station_id)
```
## Get metadata
```R
metadata <- friendlyr::meta(service="d.glb.fieldyr",element_id=element_id,station_id=station_id)
```
---
title: "data.glb.arome"
output: rmarkdown::html_vignette
vignette: >
%\VignetteIndexEntry{data.glb.arome}
%\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.glb.aromyr.git")
```
## Get timeseries data
Get data from eimet embedded dataset.
```R
fromDate <- "2018/03/01 00:00:00"
toDate <- "2018/03/10 00:00:00"
timeResolution <- precision <- "daily"
station_id <- c("Bygdin","Osensjøen")
element_id <- c("RR")
location <- NULL
df <- friendlyr::ts(service="d.glb.aromyr",
fromDate=fromDate,toDate=toDate,precision=timeResolution,timeResolution=timeResolution,
element_id=element_id,station_id=station_id)
```
## Get metadata
```R
metadata <- friendlyr::meta(service="d.glb.aromyr",element_id=element_id,station_id=station_id)
```
---
title: "data.glb.obs"
output: rmarkdown::html_vignette
vignette: >
%\VignetteIndexEntry{data.glb.obs}
%\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.glb.obsyr.git")
```
## Get timeseries data
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å")
element_id <- c("RR")
location <- NULL
df <- friendlyr::ts(service="d.glb.obsyr",
fromDate=fromDate,toDate=toDate,precision=timeResolution,timeResolution=timeResolution,
element_id=element_id,station_id=station_id)
```
## Get metadata
```R
metadata <- friendlyr::meta(service="d.glb.obsyr",element_id=element_id,station_id=station_id)
```
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment