fix id issue with dplyr

Author: dsjohnson

DESCRIPTION

@@ -2,7 +2,7 @@ Package: crawl
 Type: Package
 Title: Fit Continuous-Time Correlated Random Walk Models to Animal Movement Data
 Version: 2.3.1
-Date: 2024-10-03
+Date: 2026-01-08
 Authors@R: c(person("Devin S.", "Johnson", email = "devin.johnson@noaa.gov",
                   role = c("aut", "cre")),
                   person("Josh", "London", email = "josh.london@noaa.gov",
@@ -36,7 +36,7 @@ Encoding: UTF-8
 LazyLoad: yes
 ByteCompile: TRUE
 NeedsCompilation: yes
-RoxygenNote: 7.3.2
+RoxygenNote: 7.3.3
 URL: https://github.com/NMML/crawl
 BugReports: https://github.com/NMML/crawl/issues
 LazyData: true

R/crawl-package.R

@@ -167,8 +167,8 @@ NULL
           "Demos and documentation can be found at our new GitHub repository:\n",
           "https://dsjohnson.github.io/crawl_examples/\n",
           "\n",
-          "WARNING!!! v. 2.3.0 will be the last version of {crawl} hosted on CRAN.\n",
-          "see 'https://github.com/NMML/crawl' for any future bug fixes."
+          "WARNING!!! v. 2.3.x will be the last version of {crawl} hosted on CRAN.\n",
+          "see 'https://github.com/NMML/crawl' for any future update beyond bug fixes."
           )
   )
 }

R/crw_coerce_sf.R

@@ -120,7 +120,7 @@ crw_as_sf.list <- function(data,ftype,
   if (ftype == "MULTILINESTRING") {
     make_mls <- function(ll) {
       do.call(rbind,ll) %>% 
-        dplyr::group_by(id) %>% 
+        dplyr::group_by(.data$id) %>% 
         dplyr::summarise(do_union = FALSE)
     }
     sf_list <- data %>% purrr::map(make_mls)