tests/testthat/_test_analytics.R

library(testthat)
library(lubridate)


# test_that("Gradient boosted model works", {
#
#   result <- predict_aq_from_weather(city='Delhi',
#                                     poll=rcrea::PM25,
#                                     training_prediction_cut=lubridate::as_date("2017-10-01"),
#                                     training_average_by='hour',
#                                     training_average_by_width=3,
#                                     weather_radius_km=20
#                           )
# })
hubert-thieriot/crea_r_package documentation built on June 11, 2025, 11:31 p.m.