Error in `.get_token()`: Please set TIMEGPT_TOKEN. Use nixtla_set_token() or set it as an environment variable in .Renviron

response <- timegpt_anomaly_detection(test_data, id_col = "unique_id")
expect_true(all(c("unique_id", "ds", "y", "anomaly", "TimeGPT-lo-99", "TimeGPT", "TimeGPT-hi-99") %in% names(response)))

response <- timegpt_cross_validation(test_data, h = 8, id_col = "unique_id", n_windows = 5)
expect_true(all(c("unique_id", "ds", "cutoff", "y", "TimeGPT") %in% names(response)))

response <- timegpt_forecast(test_data, h = 8, id_col = "unique_id", level = c(80,95))
expect_true(all(c("unique_id", "ds", "TimeGPT") %in% names(response)))

response <- timegpt_historic(test_data, id_col = "unique_id", level = c(80,95))