From 098ace2a0d93034966efaed662ffd97f306961ea Mon Sep 17 00:00:00 2001 From: July Pilowsky Date: Wed, 11 Oct 2023 09:03:53 -0400 Subject: [PATCH] Spell check --- DESCRIPTION | 11 ++++++----- R/region_subset.R | 6 +++--- 2 files changed, 9 insertions(+), 8 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index ddc2517..258304c 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,16 +1,16 @@ Package: paleopop Type: Package Title: Pattern-Oriented Modeling Framework for Coupled Niche-Population Paleo-Climatic Models -Version: 2.1.4 +Version: 2.1.5 Authors@R: c( person("Sean", "Haythorne", email = "sean.haythorne@adelaide.edu.au", role = c("aut")), - person("Julia", "Pilowsky", email = "julia.pilowsky@adelaide.edu.au", role = c("aut", "cre"), + person("July", "Pilowsky", email = "pilowskyj@caryinstitute.org", role = c("aut", "cre"), comment = c(ORCID = "https://orcid.org/0000-0002-6376-2585")), person("Stuart", "Brown", email = "s.brown@adelaide.edu.au", role = c("aut"), comment = c(ORCID = "https://orcid.org/0000-0002-0669-1418")), person("Damien", "Fordham", email = "damien.fordham@adelaide.edu.au", role = c("aut"), comment = c(ORCID = "https://orcid.org/0000-0003-2137-5592"))) -Maintainer: Julia Pilowsky +Maintainer: July Pilowsky URL: https://github.com/GlobalEcologyLab/paleopop/ BugReports: https://github.com/GlobalEcologyLab/paleopop/issues Description: This extension of the poems pattern-oriented modeling (POM) framework @@ -21,7 +21,7 @@ Depends: R (>= 3.6.0) License: GPL (>= 3) Encoding: UTF-8 LazyData: true -RoxygenNote: 7.2.1 +RoxygenNote: 7.2.3 Imports: poems (>= 1.0.0), R6 (>= 2.5.0), @@ -41,6 +41,7 @@ Suggests: rmarkdown, markdown, dplyr, - raster + raster, + sf VignetteBuilder: knitr Config/testthat/edition: 3 diff --git a/R/region_subset.R b/R/region_subset.R index 2419795..1ee4665 100644 --- a/R/region_subset.R +++ b/R/region_subset.R @@ -1,6 +1,6 @@ -#' Function generates a region subset of matrix values based on a subset of coordinates within the original region (using nearest spatial neighbour if coordinates differ). +#' Function generates a region subset of matrix values based on a subset of coordinates within the original region (using nearest spatial neighbor if coordinates differ). #' -#' \code{region_subset} generates a region subset of matrix values based on a subset of coordinates within the original region (using nearest spatial neighbour if coordinates differ). +#' \code{region_subset} generates a region subset of matrix values based on a subset of coordinates within the original region (using nearest spatial neighbor if coordinates differ). #' #' @examples #' coordinates <- data.frame(x = rep(seq(-178.02, -178.06, -0.01), 5), @@ -89,7 +89,7 @@ region_subset = function(orig_coords = NULL, orig_matrix = NULL, subset_coords = orig_coords <- cbind(orig_coords, ret) subset_coords <- sf::st_as_sf(subset_coords, coords = c("x", "y"), crs = 4326) - # Join coordinates by matching to nearest spatial neighbour + # Join coordinates by matching to nearest spatial neighbor joined_ids <- as.data.frame(sf::st_join(x = subset_coords, y = orig_coords, join = sf::st_nearest_feature))[, 1:2] # Return the subset of the original matrix corresponding to the joined ID's