silence tests further

r-spatial · Mar 20, 2024 · 7bf3b66 · 7bf3b66
1 parent 97b4c3b
commit 7bf3b66
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 24 deletions.
diff --git a/tests/read.R b/tests/read.R
@@ -104,13 +104,13 @@ if ("SQLite" %in% st_drivers()$name && require(RSQLite)) {
 	  dbcon <- dbConnect(dbDriver("SQLite"), db)
 	  m = dbReadTable(dbcon, "HighWays")
 	  m$Geometry = st_as_sfc(m$Geometry, spatialite = TRUE) # spatialite wkb
-	  print(st_sf(m), n = 3)
+	  print(st_sf(m), n = 1)
 	  m = dbReadTable(dbcon, "Towns")
 	  m$Geometry = st_as_sfc(m$Geometry, spatialite = TRUE) # spatialite wkb
-	  print(st_sf(m), n = 3)
+	  print(st_sf(m), n = 1)
 	  m = dbReadTable(dbcon, "Regions")
 	  m$Geometry = st_as_sfc(m$Geometry, spatialite = TRUE) # spatialite wkb
-	  print(st_sf(m), n = 3)
+	  print(st_sf(m), n = 1)
 	}
 }
 

diff --git a/tests/read.Rout.save b/tests/read.Rout.save
@@ -190,13 +190,13 @@ Projected CRS: Undefined Cartesian SRS with unknown unit
 + 	  dbcon <- dbConnect(dbDriver("SQLite"), db)
 + 	  m = dbReadTable(dbcon, "HighWays")
 + 	  m$Geometry = st_as_sfc(m$Geometry, spatialite = TRUE) # spatialite wkb
-+ 	  print(st_sf(m), n = 3)
++ 	  print(st_sf(m), n = 1)
 + 	  m = dbReadTable(dbcon, "Towns")
 + 	  m$Geometry = st_as_sfc(m$Geometry, spatialite = TRUE) # spatialite wkb
-+ 	  print(st_sf(m), n = 3)
++ 	  print(st_sf(m), n = 1)
 + 	  m = dbReadTable(dbcon, "Regions")
 + 	  m$Geometry = st_as_sfc(m$Geometry, spatialite = TRUE) # spatialite wkb
-+ 	  print(st_sf(m), n = 3)
++ 	  print(st_sf(m), n = 1)
 + 	}
 + }
 Loading required package: RSQLite
@@ -249,35 +249,25 @@ Geometry type: LINESTRING
 Dimension:     XY
 Bounding box:  xmin: 645003 ymin: 4822568 xmax: 748805.6 ymax: 4992001
 Projected CRS: WGS 84 / UTM zone 32N
-First 3 features:
+First 1 features:
   PK_UID    Name                       Geometry
 1      1 Unknown LINESTRING (668540.7 485826...
-2      2 Unknown LINESTRING (671365.9 485417...
-3      3 Unknown LINESTRING (671417.6 485417...
 Simple feature collection with 8101 features and 6 fields
 Geometry type: POINT
 Dimension:     XY
 Bounding box:  xmin: 319224 ymin: 3934674 xmax: 1308585 ymax: 5214373
 Projected CRS: WGS 84 / UTM zone 32N
-First 3 features:
-  PK_UID               Name Peoples LocalCounc County Region
-1      1            Brozolo     435          1      0      0
-2      2 Campiglione-Fenile    1284          1      0      0
-3      3          Canischio     274          1      0      0
-                  Geometry
-1 POINT (427002.8 4996361)
-2 POINT (367470.5 4962414)
-3 POINT (390084.1 5025552)
+First 1 features:
+  PK_UID    Name Peoples LocalCounc County Region                 Geometry
+1      1 Brozolo     435          1      0      0 POINT (427002.8 4996361)
 Simple feature collection with 10 features and 2 fields
 Geometry type: MULTIPOLYGON
 Dimension:     XY
 Bounding box:  xmin: 378359.8 ymin: 4198234 xmax: 1211486 ymax: 5036803
 Projected CRS: WGS 84 / UTM zone 32N
-First 3 features:
+First 1 features:
   PK_UID   Name                       Geometry
 1      1 VENETO MULTIPOLYGON (((752912.3 50...
-2      2 VENETO MULTIPOLYGON (((751705.5 50...
-3      3 VENETO MULTIPOLYGON (((766247.8 50...
 > 
 > csv = system.file("csv/pt.csv", package = "sf")
 > identical(st_read(quiet = TRUE, csv, options = "AUTODETECT_TYPE=Yes")$Int64[3], NA_real_)
@@ -329,4 +319,4 @@ Error : wkt parse error.
 > 
 > proc.time()
    user  system elapsed 
-  1.252   1.361   1.109 
+  1.272   1.360   1.182 
diff --git a/tests/sfc.Rout.save b/tests/sfc.Rout.save
@@ -437,7 +437,6 @@ Classes 'sf' and 'data.frame':	100 obs. of  15 variables:
  - attr(*, "sf_column")= chr "geometry"
  - attr(*, "agr")= Factor w/ 3 levels "constant","aggregate",..: NA NA NA NA NA NA NA NA NA NA ...
   ..- attr(*, "names")= chr [1:14] "AREA" "PERIMETER" "CNTY_" "CNTY_ID" ...
- - attr(*, ".sf_namespace")=function ()  
 > bb = st_as_sfc(st_bbox(nc))
 > format(st_bbox(nc))
 [1] "((-84.32385,33.88199),(-75.45698,36.58965))"
@@ -1089,4 +1088,4 @@ CRS:           NA
 > 
 > proc.time()
    user  system elapsed 
-  5.159   1.424   5.082 
+  5.156   1.454   5.144