tests/testthat/test-otd.R

context("otd")

test_that("read metadata works", {
  inlandwaters <- otd(system.file("extdata", "datasource.gpkg", package = "gladr"))
  mixed_poly_lines <- otg(system.file("extdata", "Drawing.mif", package = "gladr"))
})
r-gris/gladr documentation built on May 26, 2019, 1:33 p.m.