address #154

r-spatial · Jun 2, 2024 · 1fb4943 · 1fb4943
1 parent 198ca9c
commit 1fb4943
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 4 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: spdep
-Version: 1.3-4
-Date: 2024-05-31
+Version: 1.3-5
+Date: 2024-06-02
 Title: Spatial Dependence: Weighting Schemes, Statistics
 Encoding: UTF-8
 Authors@R: c(person("Roger", "Bivand", role = c("cre", "aut"), 

diff --git a/NEWS.md b/NEWS.md
@@ -1,5 +1,9 @@
 # Version 1.3-4 (development)
 
+* #154 turn on `s2` in vignette
+
+# Version 1.3-4 (2024-05-31)
+
 * add `scale` argument to `geary.test`, `geary.mc` and `geary` #151, and appropriate tests
 
 * Introduce error in `knearneigh` for `k` less than the largest count of identical points; if encountered, increase `k`

diff --git a/vignettes/sids.Rmd b/vignettes/sids.Rmd
@@ -49,7 +49,7 @@ data set in **spData**. The actual data, included in a shapefile of the county b
 ```{r echo=TRUE,eval=TRUE}
 library(spdep)
 nc <- st_read(system.file("shapes/sids.shp", package="spData")[1], quiet=TRUE)
-st_crs(nc) <- "+proj=longlat +datum=NAD27"
+st_crs(nc) <- "EPSG:4267"
 row.names(nc) <- as.character(nc$FIPSNO)
 ```
 
@@ -63,7 +63,7 @@ using the `st_centroid` method from **sf** as an **sfc** POINT object, and can
 be used to place labels after the extraction of the coordinate matrix:
 
 ```{r echo=TRUE}
-sf_use_s2(FALSE)
+sf_use_s2(TRUE)
 plot(st_geometry(nc), axes=TRUE)
 text(st_coordinates(st_centroid(st_geometry(nc), of_largest_polygon=TRUE)), label=nc$FIPSNO, cex=0.5)
 ```