Skip to content

Commit

Permalink
Merge pull request #1 from bjohnso005/master_fix
Browse files Browse the repository at this point in the history
Fix CRAN check
  • Loading branch information
danflop authored Oct 17, 2023
2 parents 82b3bde + bd0b42c commit 5750fb1
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 2 deletions.
3 changes: 2 additions & 1 deletion R/mcpSDM.R
Original file line number Diff line number Diff line change
Expand Up @@ -22,10 +22,11 @@
#' # create continuous raster
#' p <- raster::raster(nrows=108, ncols=108, xmn=-50, xmx=50)
#' raster::values(p)<- runif(n = (108*108))
#' raster::crs(p) <- "+proj=longlat +ellps=WGS84 +datum=WGS84 +no_defs"
#' # create occurrences
#' xy <- dismo::randomPoints(p, 4)
#' # create original convex hull
#' ch.orig <- mcp(xy)
#' ch.orig <- mcp(xy, crs = "+proj=longlat +ellps=WGS84 +datum=WGS84 +no_defs")
#' # set threshold
#' thr <- 0.5
#' # mcpSDM
Expand Down
3 changes: 2 additions & 1 deletion tests/testthat/test_mcpSDM.R
Original file line number Diff line number Diff line change
@@ -1,10 +1,11 @@
# create continuous raster
p <- raster::raster(nrows=108, ncols=108, xmn=-50, xmx=50)
raster::values(p)<- runif(n = (108*108))
raster::crs(p) <- "+proj=longlat +ellps=WGS84 +datum=WGS84 +no_defs"
# create occurrences
xy <- dismo::randomPoints(p, 4)
# create original convex hull
ch.orig <- mcp(xy)
ch.orig <- mcp(xy, crs = "+proj=longlat +ellps=WGS84 +datum=WGS84 +no_defs")
# set threshold
thr <- 0.5
# mcpSDM
Expand Down

0 comments on commit 5750fb1

Please sign in to comment.