tests/testthat/test-set_boundary.R

test_that("removes bcircles parameter when setting new bboxes parameter", {

	q1 <- ohsome_elements_count("8,49,1000")
	q2 <- set_boundary(q1, "8,49,9,50")
	expect_null(q2$body$bcircles)
})

Try the ohsome package in your browser

Any scripts or data that you put into this service are public.

ohsome documentation built on Aug. 30, 2023, 5:18 p.m.