knitr::opts_chunk$set( collapse = TRUE, comment = "#>", fig.path = "man/figures/README-", out.width = "100%" )
The goal of entsog is to wrap the ENTSO-G API.
You can install the development version from GitHub with:
# install.packages("devtools") devtools::install_github("krose/entsog")
Most of the functions have a lot of paramaters you can use to filter. The ones shown below are just very basic.
Here is how to get data. We load the relevant packages and extract the data from the api:
library(entsog) library(tidyverse)
Get all the connections between transmission system operators and their respective balancing zones
glimpse(eg_agg(countryKey = "DE"))
Get Interconnection points
glimpse(eg_connectionpoints())
Here I get the physical flow for Malnow, but you can use this function to get Nomination, Renominations, Allocations, Physical Flows, GCV, Wobbe Index, Capacities and Interruptions.
# Get Malnow flows. malnow_phys <- eg_op(indicator = "Physical Flow", pointDirection = "DE-TSO-0001ITP-00096entry", from = Sys.Date() - 2, to = Sys.Date() +2, periodType = "hour") malnow_noms <- eg_op(indicator = "Nomination", pointDirection = "DE-TSO-0001ITP-00096entry", from = Sys.Date() - 2, to = Sys.Date() +2, periodType = "hour") malnow <- dplyr::bind_rows(malnow_phys, malnow_noms) glimpse(malnow_phys) ggplot(malnow, aes(periodFrom, value, col = indicator)) + geom_line() + theme_light()
This if from Entso-G:
... the API is publicly available, there are some restrictions in the use of API to ensure that the limited resources of the ENTSOG TP are shared fairly with all TP users. There is a timeout value on all queries to be 60 seconds. Additional filters should be used such as data ranges, specific points, operators and/or indicators to return a successful result set.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.