tests/testthat/test-geojson_to_sf.R

In SamA-DS/Rbduk: Assorted functions for BDUK analysts

test_that("Base functionality", {
  expect_true(
    !is.null(
      geojson_to_sf(
        data=bduk_bq(
          sql="SELECT * FROM dcms-datalake-staging.GEO_ONS.shp_LA LIMIT 1" ,
          project="dcms-datalake-staging",
          keypath="/home/dcms/keys"),
        geojson_colname = "geom"
      )
    )
  )
})