set.seed(123)
panel <- data.frame(
year = rep(2000:2005, 3),
sector = rep(c("A", "B", "C"), each = 6),
log_direct = rnorm(18, mean = 5),
log_production = rnorm(18, mean = 5)
)
ts_agg <- aggregate_to_timeseries(panel)
head(ts_agg)
Run the code above in your browser using DataLab