diff --git a/DESCRIPTION b/DESCRIPTION
index 532cb0b6..e8e0ac1b 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,7 +1,7 @@
Package: entsoeapi
Type: Package
Title: An R Wrapper for the European Network of Transmission System Operators for Electricity Application Programming Interface
-Version: 0.9.5.0
+Version: 0.9.5.1
Authors@R: c(person("Kenneth", "Rose", role="aut", email="kennethrose82@gmail.com"),
person("Sándor", "Budai", role=c("aut", "cre"), email="sbudai.ga@gmail.com"))
Description: Simple and standardized wrappers around Entso-E API's Market, Load, Generation,
diff --git a/NEWS.md b/NEWS.md
index 76836153..07c843b7 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -1,3 +1,13 @@
+# entsoeapi v0.9.5.1 (2026-03-09)
+
+## New functionality
+
+- None.
+
+## Miscellaneous
+
+- There seemed to be a bug in the tidy output of some functions (unrelated dates occurred twice in the tidy output). This issue has been resolved.
+
# entsoeapi v0.9.5.0 (2026-03-05)
## New functionality
diff --git a/R/en_balancing.R b/R/en_balancing.R
index aedd1ae5..3bcd4139 100644
--- a/R/en_balancing.R
+++ b/R/en_balancing.R
@@ -35,7 +35,7 @@ utils::globalVariables(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
elastic_demands <- function(
eic = NULL,
@@ -113,7 +113,7 @@ elastic_demands <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
netted_volumes <- function(
eic = NULL,
@@ -196,7 +196,8 @@ netted_volumes <- function(
#' period_end = lubridate::ymd(x = "2022-08-17", tz = "CET"),
#' tidy_output = TRUE
#' )
-#' str(df1)
+#'
+#' dplyr::glimpse(df1)
#'
#' df2 <- entsoeapi::exchanged_volumes(
#' eic = "10YCZ-CEPS-----N",
@@ -206,7 +207,7 @@ netted_volumes <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df2)
+#' dplyr::glimpse(df2)
#'
exchanged_volumes <- function(
eic = NULL,
@@ -290,7 +291,7 @@ exchanged_volumes <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
balancing_border_cap_limit <- function(
eic_in = NULL,
@@ -375,7 +376,7 @@ balancing_border_cap_limit <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
exchanged_volumes_per_border <- function(
acquiring_eic = NULL,
@@ -460,7 +461,7 @@ exchanged_volumes_per_border <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
hvdc_link_constrains <- function(
eic_in = NULL,
@@ -551,7 +552,7 @@ hvdc_link_constrains <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
changes_to_bid_availability <- function(
eic = NULL,
@@ -629,7 +630,7 @@ changes_to_bid_availability <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
current_balancing_state <- function(
eic = NULL,
@@ -701,7 +702,7 @@ current_balancing_state <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
balancing_energy_bids <- function(
eic = NULL,
@@ -777,7 +778,7 @@ balancing_energy_bids <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
aggregated_balancing_energy_bids <- function( # nolint: object_length_linter
eic = NULL,
@@ -858,7 +859,7 @@ aggregated_balancing_energy_bids <- function( # nolint: object_length_linter
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
procured_balancing_capacity <- function(
eic = NULL,
@@ -938,7 +939,7 @@ procured_balancing_capacity <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
allocation_of_cross_zonal_balancing_cap <- function( # nolint: object_length_linter
eic_acquiring = NULL,
@@ -1037,7 +1038,7 @@ allocation_of_cross_zonal_balancing_cap <- function( # nolint: object_length_lin
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
contracted_reserves <- function(
eic = NULL,
@@ -1119,7 +1120,7 @@ contracted_reserves <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
activated_balancing_prices <- function(
eic = NULL,
@@ -1198,7 +1199,7 @@ activated_balancing_prices <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
imbalance_prices <- function(
eic = NULL,
@@ -1269,7 +1270,7 @@ imbalance_prices <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
imbalance_volumes <- function(
eic = NULL,
@@ -1340,7 +1341,7 @@ imbalance_volumes <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
financial_expenses_and_income_for_balancing <- function( # nolint: object_length_linter
eic = NULL,
@@ -1411,7 +1412,7 @@ financial_expenses_and_income_for_balancing <- function( # nolint: object_length
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
fcr_total_capacity <- function(
eic = NULL,
@@ -1487,7 +1488,7 @@ fcr_total_capacity <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
shares_of_fcr_capacity <- function(
eic = NULL,
@@ -1568,7 +1569,7 @@ shares_of_fcr_capacity <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
rr_and_frr_actual_capacity <- function(
eic = NULL,
@@ -1638,7 +1639,7 @@ rr_and_frr_actual_capacity <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
rr_actual_capacity <- function(
eic = NULL,
@@ -1713,7 +1714,7 @@ rr_actual_capacity <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#' }
#'
sharing_of_frr_capacity <- function(
diff --git a/R/en_generation.R b/R/en_generation.R
index 719ba68a..ae2c3ff3 100644
--- a/R/en_generation.R
+++ b/R/en_generation.R
@@ -33,7 +33,8 @@ utils::globalVariables(
#' psr_type = "B05",
#' year = 2020
#' )
-#' str(df)
+#'
+#' dplyr::glimpse(df)
#'
gen_installed_capacity_per_pt <- function(
eic = NULL,
@@ -98,7 +99,8 @@ gen_installed_capacity_per_pt <- function(
#' year = 2020,
#' psr_type = "B05"
#' )
-#' str(df)
+#'
+#' dplyr::glimpse(df)
#'
gen_installed_capacity_per_pu <- function(
eic = NULL,
@@ -176,7 +178,8 @@ gen_installed_capacity_per_pu <- function(
#' gen_type = NULL,
#' tidy_output = TRUE
#' )
-#' str(df)
+#'
+#' dplyr::glimpse(df)
#'
gen_per_prod_type <- function(
eic = NULL,
@@ -254,7 +257,8 @@ gen_per_prod_type <- function(
#' period_end = lubridate::ymd(x = "2021-02-15", tz = "CET"),
#' tidy_output = TRUE
#' )
-#' str(df)
+#'
+#' dplyr::glimpse(df)
#'
gen_storage_mean_filling_rate <- function(
eic = NULL,
@@ -325,7 +329,8 @@ gen_storage_mean_filling_rate <- function(
#' gen_type = c("B04", "B05"),
#' tidy_output = TRUE
#' )
-#' str(df)
+#'
+#' dplyr::glimpse(df)
#'
gen_per_gen_unit <- function(
eic = NULL,
@@ -489,7 +494,8 @@ gen_per_gen_unit <- function(
#' period_end = lubridate::ymd(x = "2020-03-01", tz = "CET"),
#' tidy_output = TRUE
#' )
-#' str(df)
+#'
+#' dplyr::glimpse(df)
#'
gen_day_ahead_forecast <- function(
eic = NULL,
@@ -561,9 +567,10 @@ gen_day_ahead_forecast <- function(
#' period_end = lubridate::ymd(x = "2020-03-01", tz = "CET"),
#' tidy_output = TRUE
#' )
-#' str(df_list$`Day-ahead`)
-#' str(df_list$`Intraday`)
-#' str(df_list$`Current`)
+#'
+#' dplyr::glimpse(df_list$`Day-ahead`)
+#' dplyr::glimpse(df_list$`Intraday`)
+#' dplyr::glimpse(df_list$`Current`)
#'
gen_wind_solar_forecasts <- function(
eic = NULL,
diff --git a/R/en_helpers.R b/R/en_helpers.R
index d9f65b82..24837e2c 100644
--- a/R/en_helpers.R
+++ b/R/en_helpers.R
@@ -41,7 +41,7 @@ mh <- cachem::cache_mem(max_age = 3600)
#' @examples
#' eic_party <- entsoeapi::party_eic()
#'
-#' str(eic_party)
+#' dplyr::glimpse(eic_party)
#'
party_eic <- function() {
# set the link of the csv file
@@ -86,7 +86,7 @@ party_eic <- function() {
#' @examples
#' eic_area <- entsoeapi::area_eic()
#'
-#' str(eic_area)
+#' dplyr::glimpse(eic_area)
#'
area_eic <- function() {
# set the link of the csv file
@@ -133,7 +133,7 @@ area_eic <- function() {
#' @examples
#' eic_accounting_point <- entsoeapi::accounting_point_eic()
#'
-#' str(eic_accounting_point)
+#' dplyr::glimpse(eic_accounting_point)
#'
accounting_point_eic <- function() {
# set the link of the csv file
@@ -180,7 +180,7 @@ accounting_point_eic <- function() {
#' @examples
#' eic_tie_line <- entsoeapi::tie_line_eic()
#'
-#' str(eic_tie_line)
+#' dplyr::glimpse(eic_tie_line)
#'
tie_line_eic <- function() {
# set the link of the csv file
@@ -226,7 +226,7 @@ tie_line_eic <- function() {
#' @examples
#' eic_location <- entsoeapi::location_eic()
#'
-#' str(eic_location)
+#' dplyr::glimpse(eic_location)
#'
location_eic <- function() {
# set the link of the csv file
@@ -273,7 +273,7 @@ location_eic <- function() {
#' @examples
#' eic_resource_object <- entsoeapi::resource_object_eic()
#'
-#' str(eic_resource_object)
+#' dplyr::glimpse(eic_resource_object)
#'
resource_object_eic <- function() {
# set the link of the csv file
@@ -325,7 +325,7 @@ resource_object_eic <- function() {
#' @examples
#' eic_substation <- entsoeapi::substation_eic()
#'
-#' str(eic_substation)
+#' dplyr::glimpse(eic_substation)
#'
substation_eic <- function() {
# set the link of the csv file
@@ -372,7 +372,7 @@ substation_eic <- function() {
#' @examples
#' eic_all <- entsoeapi::all_approved_eic()
#'
-#' str(eic_all)
+#' dplyr::glimpse(eic_all)
#'
all_approved_eic <- function() {
list(
diff --git a/R/en_load.R b/R/en_load.R
index 301cb1b0..031fb892 100644
--- a/R/en_load.R
+++ b/R/en_load.R
@@ -39,7 +39,7 @@ utils::globalVariables(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
load_actual_total <- function(
eic = NULL,
@@ -117,7 +117,7 @@ load_actual_total <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
load_day_ahead_total_forecast <- function(
eic = NULL,
@@ -193,7 +193,7 @@ load_day_ahead_total_forecast <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
load_week_ahead_total_forecast <- function(
eic = NULL,
@@ -269,7 +269,7 @@ load_week_ahead_total_forecast <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
load_month_ahead_total_forecast <- function( # nolint: object_length_linter
eic = NULL,
@@ -345,7 +345,7 @@ load_month_ahead_total_forecast <- function( # nolint: object_length_linter
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
load_year_ahead_total_forecast <- function(
eic = NULL,
@@ -419,7 +419,7 @@ load_year_ahead_total_forecast <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
load_year_ahead_forecast_margin <- function( # nolint: object_length_linter
eic = NULL,
diff --git a/R/en_market.R b/R/en_market.R
index beae47a9..9c7ac526 100644
--- a/R/en_market.R
+++ b/R/en_market.R
@@ -42,7 +42,7 @@ utils::globalVariables(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
implicit_offered_transfer_capacity <- function( # nolint: object_length_linter
eic_in = NULL,
@@ -133,7 +133,7 @@ implicit_offered_transfer_capacity <- function( # nolint: object_length_linter
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
explicit_offered_transfer_capacity <- function( # nolint: object_length_linter
eic_in = NULL,
@@ -216,7 +216,7 @@ explicit_offered_transfer_capacity <- function( # nolint: object_length_linter
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
continuous_offered_transfer_capacity <- function( # nolint: object_length_linter
eic_in = NULL,
@@ -300,7 +300,7 @@ continuous_offered_transfer_capacity <- function( # nolint: object_length_linter
#' tidy_output = TRUE
#' )
#'
-#' str(df1)
+#' dplyr::glimpse(df1)
#'
#' df2 <- entsoeapi::flow_based_allocations(
#' eic = "10YDOM-REGION-1V",
@@ -311,7 +311,7 @@ continuous_offered_transfer_capacity <- function( # nolint: object_length_linter
#' tidy_output = TRUE
#' )
#'
-#' str(df2)
+#' dplyr::glimpse(df2)
#'
flow_based_allocations <- function(
eic = NULL,
@@ -400,7 +400,7 @@ flow_based_allocations <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
auction_revenue <- function(
eic_in = NULL,
@@ -483,7 +483,7 @@ auction_revenue <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
total_nominated_capacity <- function(
eic_in = NULL,
@@ -578,7 +578,7 @@ total_nominated_capacity <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
already_allocated_total_capacity <- function( # nolint: object_length_linter
eic_in = NULL,
@@ -664,7 +664,7 @@ already_allocated_total_capacity <- function( # nolint: object_length_linter
#' tidy_output = TRUE
#' )
#'
-#' str(df1)
+#' dplyr::glimpse(df1)
#'
#' df2 <- entsoeapi::day_ahead_prices(
#' eic = "10Y1001A1001A82H",
@@ -672,7 +672,7 @@ already_allocated_total_capacity <- function( # nolint: object_length_linter
#' period_end = lubridate::ymd(x = "2026-02-13", tz = "CET"),
#' tidy_output = TRUE
#' )
-#' str(df2)
+#' dplyr::glimpse(df2)
#'
day_ahead_prices <- function(
eic = NULL,
@@ -747,7 +747,7 @@ day_ahead_prices <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
net_positions <- function(
eic = NULL,
@@ -834,7 +834,7 @@ net_positions <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
congestion_income <- function(
eic = NULL,
@@ -934,7 +934,7 @@ congestion_income <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
allocated_transfer_capacities_3rd_countries <- function( # nolint: object_length_linter
eic_in = NULL,
diff --git a/R/en_outages.R b/R/en_outages.R
index 38a26945..6cab341a 100644
--- a/R/en_outages.R
+++ b/R/en_outages.R
@@ -52,7 +52,7 @@ utils::globalVariables(
#' )
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
outages_both <- function(
eic = NULL,
@@ -156,7 +156,7 @@ outages_both <- function(
#' )
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
outages_gen_units <- function(
eic = NULL,
@@ -264,7 +264,7 @@ outages_gen_units <- function(
#' )
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
outages_prod_units <- function(
eic = NULL,
@@ -363,7 +363,7 @@ outages_prod_units <- function(
#' period_end = lubridate::ymd(x = Sys.Date(), tz = "CET")
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
outages_offshore_grid <- function(
eic = NULL,
@@ -460,7 +460,7 @@ outages_offshore_grid <- function(
#' period_end = lubridate::ymd(x = "2024-04-11", tz = "CET")
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
outages_cons_units <- function(
eic = NULL,
@@ -583,7 +583,7 @@ outages_cons_units <- function(
#' period_end_update = lubridate::ymd(x = Sys.Date(), tz = "CET")
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
outages_transmission_grid <- function(
eic_in = NULL,
@@ -698,7 +698,7 @@ outages_transmission_grid <- function(
#' process_type = "A51",
#' event_nature = "C47")
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
outages_fallbacks <- function(
eic = NULL,
diff --git a/R/en_transmission.R b/R/en_transmission.R
index 421f4d89..4f07b1d4 100644
--- a/R/en_transmission.R
+++ b/R/en_transmission.R
@@ -49,7 +49,7 @@ utils::globalVariables(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
expansion_and_dismantling_project <- function( # nolint: object_length_linter
eic_in = NULL,
@@ -135,7 +135,7 @@ expansion_and_dismantling_project <- function( # nolint: object_length_linter
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
intraday_cross_border_transfer_limits <- function( # nolint: object_length_linter
eic_in = NULL,
@@ -208,7 +208,7 @@ intraday_cross_border_transfer_limits <- function( # nolint: object_length_linte
#' tidy_output = TRUE
#' )
#'
-#' str(df1)
+#' dplyr::glimpse(df1)
#'
#' df2 <- entsoeapi::forecasted_transfer_capacities(
#' eic_in = "10YDK-1--------W",
@@ -218,7 +218,7 @@ intraday_cross_border_transfer_limits <- function( # nolint: object_length_linte
#' tidy_output = TRUE
#' )
#'
-#' str(df2)
+#' dplyr::glimpse(df2)
#'
forecasted_transfer_capacities <- function(
eic_in = NULL,
@@ -292,7 +292,7 @@ forecasted_transfer_capacities <- function(
#' period_end = lubridate::ymd(x = "2019-12-01", tz = "CET"),
#' tidy_output = TRUE
#' )
-#' str(df1)
+#' dplyr::glimpse(df1)
#'
#' df2 <- entsoeapi::day_ahead_commercial_sched(
#' eic_in = "10YDK-1--------W",
@@ -301,7 +301,7 @@ forecasted_transfer_capacities <- function(
#' period_end = lubridate::ymd(x = "2019-12-01", tz = "CET"),
#' tidy_output = TRUE
#' )
-#' str(df2)
+#' dplyr::glimpse(df2)
#'
day_ahead_commercial_sched <- function(
eic_in = NULL,
@@ -376,7 +376,8 @@ day_ahead_commercial_sched <- function(
#' period_end = lubridate::ymd(x = "2019-12-01", tz = "CET"),
#' tidy_output = TRUE
#' )
-#' str(df1)
+#'
+#' dplyr::glimpse(df1)
#'
#' df2 <- entsoeapi::total_commercial_sched(
#' eic_in = "10YDK-1--------W",
@@ -385,7 +386,8 @@ day_ahead_commercial_sched <- function(
#' period_end = lubridate::ymd(x = "2019-12-01", tz = "CET"),
#' tidy_output = TRUE
#' )
-#' str(df2)
+#'
+#' dplyr::glimpse(df2)
#'
total_commercial_sched <- function(
eic_in = NULL,
@@ -459,7 +461,7 @@ total_commercial_sched <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df1)
+#' dplyr::glimpse(df1)
#'
#' df2 <- entsoeapi::cross_border_physical_flows(
#' eic_in = "10YCZ-CEPS-----N",
@@ -469,7 +471,7 @@ total_commercial_sched <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df2)
+#' dplyr::glimpse(df2)
#'
cross_border_physical_flows <- function(
eic_in = NULL,
@@ -543,7 +545,7 @@ cross_border_physical_flows <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
redispatching_cross_border <- function(
eic_in = NULL,
@@ -611,7 +613,7 @@ redispatching_cross_border <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
redispatching_internal <- function(
eic = NULL,
@@ -681,7 +683,7 @@ redispatching_internal <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
countertrading <- function(
eic_in = NULL,
@@ -754,7 +756,7 @@ countertrading <- function(
#' tidy_output = TRUE
#' )
#'
-#' str(df)
+#' dplyr::glimpse(df)
#'
costs_of_congestion_management <- function(
eic = NULL,
diff --git a/R/utils.R b/R/utils.R
index e0cbbe72..4868bd4c 100644
--- a/R/utils.R
+++ b/R/utils.R
@@ -289,13 +289,14 @@ extract_leaf_twig_branch <- function(nodesets) {
#' @noRd
tidy_or_not <- function(tbl, tidy_output = FALSE) {
# detect if there is any 'bid_ts_' column names
- bid_ts_cols <- stringr::str_subset(
+ have_bid_ts_col <- stringr::str_detect(
string = names(tbl),
pattern = "^bid_ts_"
- )
+ ) |>
+ any()
# convert the original 'bid_ts_' column names to 'ts_'
- if (length(bid_ts_cols) > 0L) {
+ if (have_bid_ts_col) {
names(tbl) <- names(tbl) |>
stringr::str_replace_all(
pattern = "^bid_ts_",
@@ -318,7 +319,7 @@ tidy_or_not <- function(tbl, tidy_output = FALSE) {
# if there is no ts_point_ column
if (length(ts_point_cols) == 0L) {
# convert the original 'bid_ts_' column names back
- if (length(bid_ts_cols) > 0L) {
+ if (have_bid_ts_col) {
names(tbl) <- names(tbl) |>
stringr::str_replace_all(
pattern = "^ts_",
@@ -437,9 +438,9 @@ tidy_or_not <- function(tbl, tidy_output = FALSE) {
data.table::as.data.table()
# fill the missing values with the last observation carry forward method
- group_cols <- c("ts_resolution", "ts_mrid")
+ group_cols_adj <- c("ts_resolution", "ts_mrid")
tbl_adj <- tbl_adj |>
- dplyr::group_by(dplyr::across(tidyselect::all_of(group_cols))) |>
+ dplyr::group_by(dplyr::across(tidyselect::all_of(group_cols_adj))) |>
tidyr::fill(dplyr::everything()) |>
dplyr::ungroup()
@@ -515,7 +516,7 @@ tidy_or_not <- function(tbl, tidy_output = FALSE) {
}
# convert the original 'bid_ts_' column names back
- if (length(bid_ts_cols) > 0L) {
+ if (have_bid_ts_col) {
names(tbl) <- names(tbl) |>
stringr::str_replace_all(
pattern = "^ts_",
diff --git a/README.Rmd b/README.Rmd
index 0827f6d7..294e7455 100644
--- a/README.Rmd
+++ b/README.Rmd
@@ -10,7 +10,7 @@ knitr::opts_chunk$set(
comment = "#>",
fig.path = "man/figures/README-",
out.width = "100%"
-)
+)
```
# entsoeapi {width="120" height="120"}
diff --git a/README.md b/README.md
index 58b1f21e..8ebefc1e 100644
--- a/README.md
+++ b/README.md
@@ -1,7 +1,8 @@
-# entsoeapi
+# entsoeapi
@@ -2056,7 +2057,7 @@ entsoeapi::load_actual_total(
#> ── API call ────────────────────────────────────────────────────────────────────
#> → https://web-api.tp.entsoe.eu/api?documentType=A65&processType=A16&outBiddingZone_Domain=10Y1001A1001A83F&periodStart=201912312300&periodEnd=202001012300&securityToken=<...>
#> <- HTTP/2 200
-#> <- date: Thu, 05 Mar 2026 15:36:12 GMT
+#> <- date: Sun, 08 Mar 2026 23:29:58 GMT
#> <- content-type: text/xml
#> <- content-disposition: inline; filename="Actual Total Load_201912312300-202001012300.xml"
#> <- x-content-type-options: nosniff
@@ -2079,7 +2080,7 @@ entsoeapi::load_actual_total(
#> $ ts_object_aggregation_def "Area", "Area", "Area", "Area", "Area"…
#> $ ts_business_type "A04", "A04", "A04", "A04", "A04", "A0…
#> $ ts_business_type_def "Consumption", "Consumption", "Consump…
-#> $ created_date_time 2026-03-05 15:36:12, 2026-03-05 15:36…
+#> $ created_date_time 2026-03-08 23:29:58, 2026-03-08 23:29…
#> $ revision_number 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,…
#> $ time_period_time_interval_start 2019-12-31 23:00:00, 2019-12-31 23:00…
#> $ time_period_time_interval_end 2020-01-01 23:00:00, 2020-01-01 23:00…
@@ -2109,7 +2110,7 @@ entsoeapi::gen_per_prod_type(
#> ── API call ────────────────────────────────────────────────────────────────────
#> → https://web-api.tp.entsoe.eu/api?documentType=A75&processType=A16&in_Domain=10Y1001A1001A83F&periodStart=201912312300&periodEnd=202001012300&securityToken=<...>
#> <- HTTP/2 200
-#> <- date: Thu, 05 Mar 2026 15:36:14 GMT
+#> <- date: Sun, 08 Mar 2026 23:29:59 GMT
#> <- content-type: text/xml
#> <- content-disposition: inline; filename="Aggregated Generation per Type_201912312300-202001012300.xml"
#> <- x-content-type-options: nosniff
@@ -2135,7 +2136,7 @@ entsoeapi::gen_per_prod_type(
#> $ ts_business_type_def "Production", "Production", "Productio…
#> $ ts_mkt_psr_type "B10", "B10", "B10", "B10", "B10", "B1…
#> $ ts_mkt_psr_type_def "Hydro-electric pure pumped storage he…
-#> $ created_date_time 2026-03-05 15:36:14, 2026-03-05 15:36…
+#> $ created_date_time 2026-03-08 23:29:59, 2026-03-08 23:29…
#> $ revision_number 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,…
#> $ time_period_time_interval_start 2019-12-31 23:00:00, 2019-12-31 23:00…
#> $ time_period_time_interval_end 2020-01-01 23:00:00, 2020-01-01 23:00…
diff --git a/man/accounting_point_eic.Rd b/man/accounting_point_eic.Rd
index 3144a1a3..371db07e 100644
--- a/man/accounting_point_eic.Rd
+++ b/man/accounting_point_eic.Rd
@@ -23,6 +23,6 @@ can take place and for which commercial business processes are defined.
\examples{
eic_accounting_point <- entsoeapi::accounting_point_eic()
-str(eic_accounting_point)
+dplyr::glimpse(eic_accounting_point)
}
diff --git a/man/activated_balancing_prices.Rd b/man/activated_balancing_prices.Rd
index 3b7f6503..a91fb735 100644
--- a/man/activated_balancing_prices.Rd
+++ b/man/activated_balancing_prices.Rd
@@ -43,6 +43,6 @@ df <- entsoeapi::activated_balancing_prices(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/aggregated_balancing_energy_bids.Rd b/man/aggregated_balancing_energy_bids.Rd
index ca5448b1..a5e5d6a6 100644
--- a/man/aggregated_balancing_energy_bids.Rd
+++ b/man/aggregated_balancing_energy_bids.Rd
@@ -46,6 +46,6 @@ df <- entsoeapi::aggregated_balancing_energy_bids(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/all_approved_eic.Rd b/man/all_approved_eic.Rd
index dd550659..7c3a0f9b 100644
--- a/man/all_approved_eic.Rd
+++ b/man/all_approved_eic.Rd
@@ -23,6 +23,6 @@ https://www.entsoe.eu/data/energy-identification-codes-eic/#eic-documentation
\examples{
eic_all <- entsoeapi::all_approved_eic()
-str(eic_all)
+dplyr::glimpse(eic_all)
}
diff --git a/man/allocated_transfer_capacities_3rd_countries.Rd b/man/allocated_transfer_capacities_3rd_countries.Rd
index 0473a5d2..c9b29e1d 100644
--- a/man/allocated_transfer_capacities_3rd_countries.Rd
+++ b/man/allocated_transfer_capacities_3rd_countries.Rd
@@ -68,6 +68,6 @@ df <- entsoeapi::allocated_transfer_capacities_3rd_countries(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/allocation_of_cross_zonal_balancing_cap.Rd b/man/allocation_of_cross_zonal_balancing_cap.Rd
index 0e648929..7f998119 100644
--- a/man/allocation_of_cross_zonal_balancing_cap.Rd
+++ b/man/allocation_of_cross_zonal_balancing_cap.Rd
@@ -42,6 +42,6 @@ df <- entsoeapi::allocation_of_cross_zonal_balancing_cap(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/already_allocated_total_capacity.Rd b/man/already_allocated_total_capacity.Rd
index 86fafeb5..0d736862 100644
--- a/man/already_allocated_total_capacity.Rd
+++ b/man/already_allocated_total_capacity.Rd
@@ -64,6 +64,6 @@ df <- entsoeapi::already_allocated_total_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/area_eic.Rd b/man/area_eic.Rd
index 50fac28a..800eb04a 100644
--- a/man/area_eic.Rd
+++ b/man/area_eic.Rd
@@ -21,6 +21,6 @@ https://www.entsoe.eu/data/energy-identification-codes-eic/eic-approved-codes
\examples{
eic_area <- entsoeapi::area_eic()
-str(eic_area)
+dplyr::glimpse(eic_area)
}
diff --git a/man/auction_revenue.Rd b/man/auction_revenue.Rd
index ec045fea..5fc6ae21 100644
--- a/man/auction_revenue.Rd
+++ b/man/auction_revenue.Rd
@@ -56,6 +56,6 @@ df <- entsoeapi::auction_revenue(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/balancing_border_cap_limit.Rd b/man/balancing_border_cap_limit.Rd
index 947bec58..5903402b 100644
--- a/man/balancing_border_cap_limit.Rd
+++ b/man/balancing_border_cap_limit.Rd
@@ -50,6 +50,6 @@ df <- entsoeapi::balancing_border_cap_limit(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/balancing_energy_bids.Rd b/man/balancing_energy_bids.Rd
index 04768137..4eb753a0 100644
--- a/man/balancing_energy_bids.Rd
+++ b/man/balancing_energy_bids.Rd
@@ -39,6 +39,6 @@ df <- entsoeapi::balancing_energy_bids(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/changes_to_bid_availability.Rd b/man/changes_to_bid_availability.Rd
index 8ade8079..2f9ec242 100644
--- a/man/changes_to_bid_availability.Rd
+++ b/man/changes_to_bid_availability.Rd
@@ -49,6 +49,6 @@ df <- entsoeapi::changes_to_bid_availability(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/congestion_income.Rd b/man/congestion_income.Rd
index 2f6844e2..8eb1eeaf 100644
--- a/man/congestion_income.Rd
+++ b/man/congestion_income.Rd
@@ -52,6 +52,6 @@ df <- entsoeapi::congestion_income(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/continuous_offered_transfer_capacity.Rd b/man/continuous_offered_transfer_capacity.Rd
index 328a81ad..62bfa421 100644
--- a/man/continuous_offered_transfer_capacity.Rd
+++ b/man/continuous_offered_transfer_capacity.Rd
@@ -43,6 +43,6 @@ df <- entsoeapi::continuous_offered_transfer_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/contracted_reserves.Rd b/man/contracted_reserves.Rd
index ab83e7ae..f75a14d5 100644
--- a/man/contracted_reserves.Rd
+++ b/man/contracted_reserves.Rd
@@ -58,6 +58,6 @@ df <- entsoeapi::contracted_reserves(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/costs_of_congestion_management.Rd b/man/costs_of_congestion_management.Rd
index e29b8fa5..1fb1fadf 100644
--- a/man/costs_of_congestion_management.Rd
+++ b/man/costs_of_congestion_management.Rd
@@ -45,6 +45,6 @@ df <- entsoeapi::costs_of_congestion_management(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/countertrading.Rd b/man/countertrading.Rd
index 96929a13..48c3e09f 100644
--- a/man/countertrading.Rd
+++ b/man/countertrading.Rd
@@ -44,6 +44,6 @@ df <- entsoeapi::countertrading(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/cross_border_physical_flows.Rd b/man/cross_border_physical_flows.Rd
index 4f3c0f04..c06ba964 100644
--- a/man/cross_border_physical_flows.Rd
+++ b/man/cross_border_physical_flows.Rd
@@ -42,7 +42,7 @@ df1 <- entsoeapi::cross_border_physical_flows(
tidy_output = TRUE
)
-str(df1)
+dplyr::glimpse(df1)
df2 <- entsoeapi::cross_border_physical_flows(
eic_in = "10YCZ-CEPS-----N",
@@ -52,6 +52,6 @@ df2 <- entsoeapi::cross_border_physical_flows(
tidy_output = TRUE
)
-str(df2)
+dplyr::glimpse(df2)
}
diff --git a/man/current_balancing_state.Rd b/man/current_balancing_state.Rd
index d837031c..6a487175 100644
--- a/man/current_balancing_state.Rd
+++ b/man/current_balancing_state.Rd
@@ -37,6 +37,6 @@ df <- entsoeapi::current_balancing_state(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/day_ahead_commercial_sched.Rd b/man/day_ahead_commercial_sched.Rd
index 4aa9876c..5a005c62 100644
--- a/man/day_ahead_commercial_sched.Rd
+++ b/man/day_ahead_commercial_sched.Rd
@@ -40,7 +40,7 @@ df1 <- entsoeapi::day_ahead_commercial_sched(
period_end = lubridate::ymd(x = "2019-12-01", tz = "CET"),
tidy_output = TRUE
)
-str(df1)
+dplyr::glimpse(df1)
df2 <- entsoeapi::day_ahead_commercial_sched(
eic_in = "10YDK-1--------W",
@@ -49,6 +49,6 @@ df2 <- entsoeapi::day_ahead_commercial_sched(
period_end = lubridate::ymd(x = "2019-12-01", tz = "CET"),
tidy_output = TRUE
)
-str(df2)
+dplyr::glimpse(df2)
}
diff --git a/man/day_ahead_prices.Rd b/man/day_ahead_prices.Rd
index 03d7a3e1..af22e616 100644
--- a/man/day_ahead_prices.Rd
+++ b/man/day_ahead_prices.Rd
@@ -37,7 +37,7 @@ df1 <- entsoeapi::day_ahead_prices(
tidy_output = TRUE
)
-str(df1)
+dplyr::glimpse(df1)
df2 <- entsoeapi::day_ahead_prices(
eic = "10Y1001A1001A82H",
@@ -45,6 +45,6 @@ df2 <- entsoeapi::day_ahead_prices(
period_end = lubridate::ymd(x = "2026-02-13", tz = "CET"),
tidy_output = TRUE
)
-str(df2)
+dplyr::glimpse(df2)
}
diff --git a/man/elastic_demands.Rd b/man/elastic_demands.Rd
index d0340ddb..22960a0d 100644
--- a/man/elastic_demands.Rd
+++ b/man/elastic_demands.Rd
@@ -42,6 +42,6 @@ df <- entsoeapi::elastic_demands(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/exchanged_volumes.Rd b/man/exchanged_volumes.Rd
index e2df3289..4be7a651 100644
--- a/man/exchanged_volumes.Rd
+++ b/man/exchanged_volumes.Rd
@@ -49,7 +49,8 @@ df1 <- entsoeapi::exchanged_volumes(
period_end = lubridate::ymd(x = "2022-08-17", tz = "CET"),
tidy_output = TRUE
)
-str(df1)
+
+dplyr::glimpse(df1)
df2 <- entsoeapi::exchanged_volumes(
eic = "10YCZ-CEPS-----N",
@@ -59,6 +60,6 @@ df2 <- entsoeapi::exchanged_volumes(
tidy_output = TRUE
)
-str(df2)
+dplyr::glimpse(df2)
}
diff --git a/man/exchanged_volumes_per_border.Rd b/man/exchanged_volumes_per_border.Rd
index b8ead33f..9a1bcebc 100644
--- a/man/exchanged_volumes_per_border.Rd
+++ b/man/exchanged_volumes_per_border.Rd
@@ -48,6 +48,6 @@ df <- entsoeapi::exchanged_volumes_per_border(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/expansion_and_dismantling_project.Rd b/man/expansion_and_dismantling_project.Rd
index acd8f138..4cde6577 100644
--- a/man/expansion_and_dismantling_project.Rd
+++ b/man/expansion_and_dismantling_project.Rd
@@ -58,6 +58,6 @@ df <- entsoeapi::expansion_and_dismantling_project(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/explicit_offered_transfer_capacity.Rd b/man/explicit_offered_transfer_capacity.Rd
index 02ecac59..b612caff 100644
--- a/man/explicit_offered_transfer_capacity.Rd
+++ b/man/explicit_offered_transfer_capacity.Rd
@@ -56,6 +56,6 @@ df <- entsoeapi::explicit_offered_transfer_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/fcr_total_capacity.Rd b/man/fcr_total_capacity.Rd
index dd6b2149..3a529c11 100644
--- a/man/fcr_total_capacity.Rd
+++ b/man/fcr_total_capacity.Rd
@@ -37,6 +37,6 @@ df <- entsoeapi::fcr_total_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/financial_expenses_and_income_for_balancing.Rd b/man/financial_expenses_and_income_for_balancing.Rd
index edcc3961..5dcdf87f 100644
--- a/man/financial_expenses_and_income_for_balancing.Rd
+++ b/man/financial_expenses_and_income_for_balancing.Rd
@@ -37,6 +37,6 @@ df <- entsoeapi::financial_expenses_and_income_for_balancing(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/flow_based_allocations.Rd b/man/flow_based_allocations.Rd
index bfede1ba..194d9ede 100644
--- a/man/flow_based_allocations.Rd
+++ b/man/flow_based_allocations.Rd
@@ -51,7 +51,7 @@ df1 <- entsoeapi::flow_based_allocations(
tidy_output = TRUE
)
-str(df1)
+dplyr::glimpse(df1)
df2 <- entsoeapi::flow_based_allocations(
eic = "10YDOM-REGION-1V",
@@ -62,6 +62,6 @@ df2 <- entsoeapi::flow_based_allocations(
tidy_output = TRUE
)
-str(df2)
+dplyr::glimpse(df2)
}
diff --git a/man/forecasted_transfer_capacities.Rd b/man/forecasted_transfer_capacities.Rd
index 515978fd..58e394f0 100644
--- a/man/forecasted_transfer_capacities.Rd
+++ b/man/forecasted_transfer_capacities.Rd
@@ -40,7 +40,7 @@ df1 <- entsoeapi::forecasted_transfer_capacities(
tidy_output = TRUE
)
-str(df1)
+dplyr::glimpse(df1)
df2 <- entsoeapi::forecasted_transfer_capacities(
eic_in = "10YDK-1--------W",
@@ -50,6 +50,6 @@ df2 <- entsoeapi::forecasted_transfer_capacities(
tidy_output = TRUE
)
-str(df2)
+dplyr::glimpse(df2)
}
diff --git a/man/gen_day_ahead_forecast.Rd b/man/gen_day_ahead_forecast.Rd
index 7b2b2872..4675e0c4 100644
--- a/man/gen_day_ahead_forecast.Rd
+++ b/man/gen_day_ahead_forecast.Rd
@@ -38,6 +38,7 @@ df <- entsoeapi::gen_day_ahead_forecast(
period_end = lubridate::ymd(x = "2020-03-01", tz = "CET"),
tidy_output = TRUE
)
-str(df)
+
+dplyr::glimpse(df)
}
diff --git a/man/gen_installed_capacity_per_pt.Rd b/man/gen_installed_capacity_per_pt.Rd
index 2c07a7e1..7781c870 100644
--- a/man/gen_installed_capacity_per_pt.Rd
+++ b/man/gen_installed_capacity_per_pt.Rd
@@ -33,6 +33,7 @@ df <- entsoeapi::gen_installed_capacity_per_pt(
psr_type = "B05",
year = 2020
)
-str(df)
+
+dplyr::glimpse(df)
}
diff --git a/man/gen_installed_capacity_per_pu.Rd b/man/gen_installed_capacity_per_pu.Rd
index 2a0d6504..959f9868 100644
--- a/man/gen_installed_capacity_per_pu.Rd
+++ b/man/gen_installed_capacity_per_pu.Rd
@@ -33,6 +33,7 @@ df <- entsoeapi::gen_installed_capacity_per_pu(
year = 2020,
psr_type = "B05"
)
-str(df)
+
+dplyr::glimpse(df)
}
diff --git a/man/gen_per_gen_unit.Rd b/man/gen_per_gen_unit.Rd
index 36cb0ab7..bada727d 100644
--- a/man/gen_per_gen_unit.Rd
+++ b/man/gen_per_gen_unit.Rd
@@ -42,6 +42,7 @@ df <- entsoeapi::gen_per_gen_unit(
gen_type = c("B04", "B05"),
tidy_output = TRUE
)
-str(df)
+
+dplyr::glimpse(df)
}
diff --git a/man/gen_per_prod_type.Rd b/man/gen_per_prod_type.Rd
index e19c9310..f0c126bc 100644
--- a/man/gen_per_prod_type.Rd
+++ b/man/gen_per_prod_type.Rd
@@ -43,6 +43,7 @@ df <- entsoeapi::gen_per_prod_type(
gen_type = NULL,
tidy_output = TRUE
)
-str(df)
+
+dplyr::glimpse(df)
}
diff --git a/man/gen_storage_mean_filling_rate.Rd b/man/gen_storage_mean_filling_rate.Rd
index 10170ed3..33ca0bcd 100644
--- a/man/gen_storage_mean_filling_rate.Rd
+++ b/man/gen_storage_mean_filling_rate.Rd
@@ -40,6 +40,7 @@ df <- entsoeapi::gen_storage_mean_filling_rate(
period_end = lubridate::ymd(x = "2021-02-15", tz = "CET"),
tidy_output = TRUE
)
-str(df)
+
+dplyr::glimpse(df)
}
diff --git a/man/gen_wind_solar_forecasts.Rd b/man/gen_wind_solar_forecasts.Rd
index e1c56558..02caeff5 100644
--- a/man/gen_wind_solar_forecasts.Rd
+++ b/man/gen_wind_solar_forecasts.Rd
@@ -41,8 +41,9 @@ df_list <- entsoeapi::gen_wind_solar_forecasts(
period_end = lubridate::ymd(x = "2020-03-01", tz = "CET"),
tidy_output = TRUE
)
-str(df_list$`Day-ahead`)
-str(df_list$`Intraday`)
-str(df_list$`Current`)
+
+dplyr::glimpse(df_list$`Day-ahead`)
+dplyr::glimpse(df_list$`Intraday`)
+dplyr::glimpse(df_list$`Current`)
}
diff --git a/man/hvdc_link_constrains.Rd b/man/hvdc_link_constrains.Rd
index 2a7179d0..f99bb308 100644
--- a/man/hvdc_link_constrains.Rd
+++ b/man/hvdc_link_constrains.Rd
@@ -51,6 +51,6 @@ df <- entsoeapi::hvdc_link_constrains(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/imbalance_prices.Rd b/man/imbalance_prices.Rd
index 066612c3..bd1558e0 100644
--- a/man/imbalance_prices.Rd
+++ b/man/imbalance_prices.Rd
@@ -37,6 +37,6 @@ df <- entsoeapi::imbalance_prices(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/imbalance_volumes.Rd b/man/imbalance_volumes.Rd
index 9d800a22..6f3a6ec4 100644
--- a/man/imbalance_volumes.Rd
+++ b/man/imbalance_volumes.Rd
@@ -37,6 +37,6 @@ df <- entsoeapi::imbalance_volumes(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/implicit_offered_transfer_capacity.Rd b/man/implicit_offered_transfer_capacity.Rd
index bf5d0a2a..1d93c421 100644
--- a/man/implicit_offered_transfer_capacity.Rd
+++ b/man/implicit_offered_transfer_capacity.Rd
@@ -50,6 +50,6 @@ df <- entsoeapi::implicit_offered_transfer_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/intraday_cross_border_transfer_limits.Rd b/man/intraday_cross_border_transfer_limits.Rd
index e0f2d0f5..b03694db 100644
--- a/man/intraday_cross_border_transfer_limits.Rd
+++ b/man/intraday_cross_border_transfer_limits.Rd
@@ -45,6 +45,6 @@ df <- entsoeapi::intraday_cross_border_transfer_limits(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/load_actual_total.Rd b/man/load_actual_total.Rd
index b15ff112..184e8e1c 100644
--- a/man/load_actual_total.Rd
+++ b/man/load_actual_total.Rd
@@ -45,6 +45,6 @@ df <- entsoeapi::load_actual_total(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/load_day_ahead_total_forecast.Rd b/man/load_day_ahead_total_forecast.Rd
index c0fa4efe..36979e80 100644
--- a/man/load_day_ahead_total_forecast.Rd
+++ b/man/load_day_ahead_total_forecast.Rd
@@ -47,6 +47,6 @@ df <- entsoeapi::load_day_ahead_total_forecast(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/load_month_ahead_total_forecast.Rd b/man/load_month_ahead_total_forecast.Rd
index 36198478..a3dea139 100644
--- a/man/load_month_ahead_total_forecast.Rd
+++ b/man/load_month_ahead_total_forecast.Rd
@@ -45,6 +45,6 @@ df <- entsoeapi::load_month_ahead_total_forecast(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/load_week_ahead_total_forecast.Rd b/man/load_week_ahead_total_forecast.Rd
index ef3e356d..2bfb70f0 100644
--- a/man/load_week_ahead_total_forecast.Rd
+++ b/man/load_week_ahead_total_forecast.Rd
@@ -45,6 +45,6 @@ df <- entsoeapi::load_week_ahead_total_forecast(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/load_year_ahead_forecast_margin.Rd b/man/load_year_ahead_forecast_margin.Rd
index cb97137f..a1cf85a5 100644
--- a/man/load_year_ahead_forecast_margin.Rd
+++ b/man/load_year_ahead_forecast_margin.Rd
@@ -43,6 +43,6 @@ df <- entsoeapi::load_year_ahead_forecast_margin(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/load_year_ahead_total_forecast.Rd b/man/load_year_ahead_total_forecast.Rd
index cf65185d..c1cd6b11 100644
--- a/man/load_year_ahead_total_forecast.Rd
+++ b/man/load_year_ahead_total_forecast.Rd
@@ -45,6 +45,6 @@ df <- entsoeapi::load_year_ahead_total_forecast(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/location_eic.Rd b/man/location_eic.Rd
index 89f806fc..a3016ab3 100644
--- a/man/location_eic.Rd
+++ b/man/location_eic.Rd
@@ -22,6 +22,6 @@ It covers an endpoint, or an IT-system.
\examples{
eic_location <- entsoeapi::location_eic()
-str(eic_location)
+dplyr::glimpse(eic_location)
}
diff --git a/man/net_positions.Rd b/man/net_positions.Rd
index 6f218461..951dfeb7 100644
--- a/man/net_positions.Rd
+++ b/man/net_positions.Rd
@@ -44,6 +44,6 @@ df <- entsoeapi::net_positions(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/netted_volumes.Rd b/man/netted_volumes.Rd
index fde624e4..374b4f1e 100644
--- a/man/netted_volumes.Rd
+++ b/man/netted_volumes.Rd
@@ -40,6 +40,6 @@ df <- entsoeapi::netted_volumes(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/outages_both.Rd b/man/outages_both.Rd
index ebfecab2..e0d64443 100644
--- a/man/outages_both.Rd
+++ b/man/outages_both.Rd
@@ -60,6 +60,6 @@ df <- entsoeapi::outages_both(
)
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/outages_cons_units.Rd b/man/outages_cons_units.Rd
index 99c12615..41f8de4f 100644
--- a/man/outages_cons_units.Rd
+++ b/man/outages_cons_units.Rd
@@ -65,6 +65,6 @@ df <- entsoeapi::outages_cons_units(
period_end = lubridate::ymd(x = "2024-04-11", tz = "CET")
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/outages_fallbacks.Rd b/man/outages_fallbacks.Rd
index 4e372fc7..7789e061 100644
--- a/man/outages_fallbacks.Rd
+++ b/man/outages_fallbacks.Rd
@@ -58,6 +58,6 @@ df <- entsoeapi::outages_fallbacks(
process_type = "A51",
event_nature = "C47")
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/outages_gen_units.Rd b/man/outages_gen_units.Rd
index 43358a29..97aed8d1 100644
--- a/man/outages_gen_units.Rd
+++ b/man/outages_gen_units.Rd
@@ -63,6 +63,6 @@ df <- entsoeapi::outages_gen_units(
)
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/outages_offshore_grid.Rd b/man/outages_offshore_grid.Rd
index 2a5d4cf3..0abc2c8a 100644
--- a/man/outages_offshore_grid.Rd
+++ b/man/outages_offshore_grid.Rd
@@ -53,6 +53,6 @@ df <- entsoeapi::outages_offshore_grid(
period_end = lubridate::ymd(x = Sys.Date(), tz = "CET")
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/outages_prod_units.Rd b/man/outages_prod_units.Rd
index 24c2fb66..847b7558 100644
--- a/man/outages_prod_units.Rd
+++ b/man/outages_prod_units.Rd
@@ -64,6 +64,6 @@ df <- entsoeapi::outages_prod_units(
)
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/outages_transmission_grid.Rd b/man/outages_transmission_grid.Rd
index 9f317225..2cef72cc 100644
--- a/man/outages_transmission_grid.Rd
+++ b/man/outages_transmission_grid.Rd
@@ -74,6 +74,6 @@ df <- entsoeapi::outages_transmission_grid(
period_end_update = lubridate::ymd(x = Sys.Date(), tz = "CET")
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/party_eic.Rd b/man/party_eic.Rd
index 4245b0ae..277de72c 100644
--- a/man/party_eic.Rd
+++ b/man/party_eic.Rd
@@ -22,6 +22,6 @@ It covers market participants.
\examples{
eic_party <- entsoeapi::party_eic()
-str(eic_party)
+dplyr::glimpse(eic_party)
}
diff --git a/man/procured_balancing_capacity.Rd b/man/procured_balancing_capacity.Rd
index 7c23b566..d3f59eb8 100644
--- a/man/procured_balancing_capacity.Rd
+++ b/man/procured_balancing_capacity.Rd
@@ -45,6 +45,6 @@ df <- entsoeapi::procured_balancing_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/redispatching_cross_border.Rd b/man/redispatching_cross_border.Rd
index 8e1a98f6..96240f7f 100644
--- a/man/redispatching_cross_border.Rd
+++ b/man/redispatching_cross_border.Rd
@@ -42,6 +42,6 @@ df <- entsoeapi::redispatching_cross_border(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/redispatching_internal.Rd b/man/redispatching_internal.Rd
index cd98e432..6ce0a03a 100644
--- a/man/redispatching_internal.Rd
+++ b/man/redispatching_internal.Rd
@@ -37,6 +37,6 @@ df <- entsoeapi::redispatching_internal(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/resource_object_eic.Rd b/man/resource_object_eic.Rd
index 047644b2..557f6a38 100644
--- a/man/resource_object_eic.Rd
+++ b/man/resource_object_eic.Rd
@@ -23,6 +23,6 @@ and that is reported in a schedule.
\examples{
eic_resource_object <- entsoeapi::resource_object_eic()
-str(eic_resource_object)
+dplyr::glimpse(eic_resource_object)
}
diff --git a/man/rr_actual_capacity.Rd b/man/rr_actual_capacity.Rd
index 4a136c32..43e9fa90 100644
--- a/man/rr_actual_capacity.Rd
+++ b/man/rr_actual_capacity.Rd
@@ -35,6 +35,6 @@ df <- entsoeapi::rr_actual_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/rr_and_frr_actual_capacity.Rd b/man/rr_and_frr_actual_capacity.Rd
index d71e9923..2e059e3b 100644
--- a/man/rr_and_frr_actual_capacity.Rd
+++ b/man/rr_and_frr_actual_capacity.Rd
@@ -48,6 +48,6 @@ df <- entsoeapi::rr_and_frr_actual_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/shares_of_fcr_capacity.Rd b/man/shares_of_fcr_capacity.Rd
index 3f20968e..5967f69c 100644
--- a/man/shares_of_fcr_capacity.Rd
+++ b/man/shares_of_fcr_capacity.Rd
@@ -43,6 +43,6 @@ df <- entsoeapi::shares_of_fcr_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/man/sharing_of_frr_capacity.Rd b/man/sharing_of_frr_capacity.Rd
index db2ee689..550d75f9 100644
--- a/man/sharing_of_frr_capacity.Rd
+++ b/man/sharing_of_frr_capacity.Rd
@@ -48,7 +48,7 @@ df <- entsoeapi::sharing_of_frr_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
}
diff --git a/man/substation_eic.Rd b/man/substation_eic.Rd
index 43da7345..e1ef7450 100644
--- a/man/substation_eic.Rd
+++ b/man/substation_eic.Rd
@@ -28,6 +28,6 @@ armoured substation and underground substation.
\examples{
eic_substation <- entsoeapi::substation_eic()
-str(eic_substation)
+dplyr::glimpse(eic_substation)
}
diff --git a/man/tie_line_eic.Rd b/man/tie_line_eic.Rd
index 7ef18aab..8dc8b309 100644
--- a/man/tie_line_eic.Rd
+++ b/man/tie_line_eic.Rd
@@ -23,6 +23,6 @@ excluding HVDC interconnectors.
\examples{
eic_tie_line <- entsoeapi::tie_line_eic()
-str(eic_tie_line)
+dplyr::glimpse(eic_tie_line)
}
diff --git a/man/total_commercial_sched.Rd b/man/total_commercial_sched.Rd
index 1f0ac4aa..efa090c4 100644
--- a/man/total_commercial_sched.Rd
+++ b/man/total_commercial_sched.Rd
@@ -41,7 +41,8 @@ df1 <- entsoeapi::total_commercial_sched(
period_end = lubridate::ymd(x = "2019-12-01", tz = "CET"),
tidy_output = TRUE
)
-str(df1)
+
+dplyr::glimpse(df1)
df2 <- entsoeapi::total_commercial_sched(
eic_in = "10YDK-1--------W",
@@ -50,6 +51,7 @@ df2 <- entsoeapi::total_commercial_sched(
period_end = lubridate::ymd(x = "2019-12-01", tz = "CET"),
tidy_output = TRUE
)
-str(df2)
+
+dplyr::glimpse(df2)
}
diff --git a/man/total_nominated_capacity.Rd b/man/total_nominated_capacity.Rd
index 7dce8402..ba4265bc 100644
--- a/man/total_nominated_capacity.Rd
+++ b/man/total_nominated_capacity.Rd
@@ -43,6 +43,6 @@ df <- entsoeapi::total_nominated_capacity(
tidy_output = TRUE
)
-str(df)
+dplyr::glimpse(df)
}
diff --git a/vignettes/da-price-spread-vignette.Rmd b/vignettes/da-price-spread-vignette.Rmd
index 679549fe..46728cf6 100644
--- a/vignettes/da-price-spread-vignette.Rmd
+++ b/vignettes/da-price-spread-vignette.Rmd
@@ -26,7 +26,7 @@ library(cli)
library(ggplot2)
```
-#### Look for the Polish market EIC and set the start and the end of scope dates
+### Look for the Polish market EIC and set the start and the end of scope dates
```{r preset constants}
pl_eic <- all_approved_eic() |>
@@ -42,7 +42,7 @@ cli_inform("from: {from_ts}")
cli_inform("till: {till_ts}")
```
-#### Query the Polish DA prices within the pre-set period
+### Query the Polish DA prices within the pre-set period
```{r query da prices}
da_prices <- entsoeapi::day_ahead_prices(
@@ -54,7 +54,7 @@ da_prices <- entsoeapi::day_ahead_prices(
glimpse(da_prices)
```
-#### Calculate the daily minimum and maximum prices and the spread
+### Calculate the daily minimum and maximum prices and the spread
```{r calculate the daily spreads}
da_spreads <- da_prices |>
@@ -75,7 +75,7 @@ da_spreads <- da_prices |>
unique()
```
-#### Plot the daily minimum and maximum prices and the spread
+### Plot the daily minimum and maximum prices and the spread
```{r plot the daily spreads}
ggplot(data = da_spreads) +
@@ -103,7 +103,7 @@ ggplot(data = da_spreads) +
) +
theme_minimal() +
labs(
- title = "Polish Daily Spread of Day-Ahead prices",
+ title = "Polish Daily Spread of Day-Ahead Prices",
subtitle = paste("PT15M,", from_ts, till_ts),
x = "delivery date",
y = "day-ahead price spread"