data("cities_temperature")
#to time series list
cities <- tsl_initialize(
x = cities_temperature,
name_column = "name",
time_column = "time"
)
#time series plot
if(interactive()){
#only four cities are shown
tsl_plot(
tsl = tsl_subset(
tsl = tsl,
names = 1:4
),
guide = FALSE
)
}
Run the code above in your browser using DataLab