test_that("benchmark and optimization return configurations", {
  ex <- autogenai_example()
  b <- benchmark_ai(ex$task, ex$data, ex$providers[1:2], ex$prompts[1:2])
  expect_true(nrow(b$summary) >= 2)
  fit <- optimize_ai(ex$task, ex$data, ex$providers[1:2], ex$prompts[1:2],
                     temperatures = 0, strategies = "single")
  expect_s3_class(fit, "autogenai")
  expect_true(is.finite(fit$best$quality))
})