library(ahead)
# Generate synthetic data
data <- AirPassengers
#result <- generate_synthetic_ts(data, length_out = 144,
# n_sim = 5, seed = 123)
# Get comprehensive summary with hypothesis tests
#summary_result <- summary(result)
#print(summary_result)