#to time series list
tsl <- tsl_initialize(
x = covid_prevalence,
name_column = "name",
time_column = "time"
)
#time series plot
if(interactive()){
#subset to avoid margin errors
tsl_plot(
tsl = tsl_subset(
tsl = tsl,
names = 1:4
),
guide = FALSE
)
}
Run the code above in your browser using DataLab