test_that("tt_subbarrio works", { actual <- maybe_304(tt_subbarrios()) expect_s3_class(actual, "data.frame") })