tests/testthat/test.spTransform.R

context("spTransform")
test_that("spTransfrom", {
  data(leroy)
  data2 <- spTransform(
    x = d <- spTransform(leroy, center = T),
    CRSobj = (proj4string(leroy))
  )
  leroy@coords.nrs <- numeric(0) # sptransfrom does this for some reason in line 123 of project.R
  expect_error(spTransform(d, center = T)) # somethign not long lat cant go to aeqd
  skip("fails on old sp version")
  expect_equal(leroy, data2)
})

Try the move package in your browser

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

move documentation built on July 9, 2023, 6:09 p.m.