This is an automated email from the ASF dual-hosted git repository.

jiayu pushed a commit to branch master
in repository https://gitbox.apache.org/repos/asf/sedona.git


The following commit(s) were added to refs/heads/master by this push:
     new 5a91619a [SEDONA-242] R: Update dependencies + fix failing test (#769)
5a91619a is described below

commit 5a91619aa85af33e7c9176470b6382aa29163b6c
Author: gregleleu <[email protected]>
AuthorDate: Wed Feb 15 12:06:51 2023 -0500

    [SEDONA-242] R: Update dependencies + fix failing test (#769)
---
 R/R/dependencies.R                      | 9 +++++----
 R/tests/testthat/test-spatial-queries.R | 2 +-
 2 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/R/R/dependencies.R b/R/R/dependencies.R
index a2f73361..57128a13 100644
--- a/R/R/dependencies.R
+++ b/R/R/dependencies.R
@@ -27,10 +27,10 @@ spark_dependencies <- function(spark_version, 
scala_version, ...) {
   }
 
   packages <- c(
-    "org.datasyslab:geotools-wrapper:geotools-24.1",
-    "org.datasyslab:sernetcdf:0.1.0",
-    "org.locationtech.jts:jts-core:1.18.0",
-    "org.wololo:jts2geojson:0.14.3"
+    "org.datasyslab:geotools-wrapper:1.3.0-27.2",
+    "edu.ucar:cdm-core:5.4.2",
+    "org.locationtech.jts:jts-core:1.19.0",
+    "org.wololo:jts2geojson:0.16.1"
   )
   jars <- NULL
 
@@ -52,6 +52,7 @@ spark_dependencies <- function(spark_version, scala_version, 
...) {
     jars = jars,
     packages = packages,
     initializer = sedona_initialize_spark_connection,
+    repositories = 
c("https://artifacts.unidata.ucar.edu/repository/unidata-all";),
     dbplyr_sql_variant = sedona_dbplyr_sql_variant()
   )
 }
diff --git a/R/tests/testthat/test-spatial-queries.R 
b/R/tests/testthat/test-spatial-queries.R
index c8896493..27be8373 100644
--- a/R/tests/testthat/test-spatial-queries.R
+++ b/R/tests/testthat/test-spatial-queries.R
@@ -68,7 +68,7 @@ collect_coords <- function(sdf) {
   sdf %>%
     dplyr::transmute(
       coords = transform(
-        ST_DumpPoints(geometry), ~ array(ST_X(.x), ST_Y(.x))
+        ST_DumpPoints(geometry), ~ array(ST_X(geometry), ST_Y(geometry))
       )
     ) %>%
     dplyr::pull(coords)

Reply via email to