if (FALSE) {
# Loading the UKgrid package to pull a multie seasonality data
require(UKgrid)
UKgrid_half_hour <- extract_grid(type = "xts", aggregate = NULL)
# Plotting the quantile of the UKgrid dataset
# No period subset
ts_quantile(UKgrid_half_hour,
period = NULL,
title = "The UK National Grid Net Demand for Electricity - Quantile Plot")
# Plotting the quantile of the UKgrid dataset
# Using a weekday subset
ts_quantile(UKgrid_half_hour,
period = "weekdays",
title = "The UK National Grid Net Demand for Electricity - by Weekdays")
# Spacing the plots by setting the
# number of rows of the plot to 2
ts_quantile(UKgrid_half_hour,
period = "weekdays",
title = "The UK National Grid Net Demand for Electricity - by Weekdays",
n = 2)
}
Run the code above in your browser using DataLab