Running ‘aggregate.R’ [1s/2s]
  Comparing ‘aggregate.Rout’ to ‘aggregate.Rout.save’ ...4c4
< Linking to GEOS 3.7.0, GDAL 2.3.1, proj.4 5.2.0
---
> Linking to GEOS 3.6.2, GDAL 2.2.3, proj.4 4.9.3
  Running ‘cast.R’ [1s/2s]
  Comparing ‘cast.Rout’ to ‘cast.Rout.save’ ... OK
  Running ‘crs.R’ [1s/2s]
  Comparing ‘crs.Rout’ to ‘crs.Rout.save’ ...47c47
< 6378137 [m]
---
> 6378137 m
50c50
< 6356752 [m]
---
> 6356752 m
68c68
< 1 [°]
---
> 1 °
75,76c75,76
< [1,]      0.0      0.0
< [2,] 111319.5 111325.1
---
> [1,]      0.0 -7.081155e-10
> [2,] 111319.5  1.113251e+05
85c85
< bbox:           xmin: 0 ymin: 0 xmax: 111319.5 ymax: 111325.1
---
> bbox:           xmin: 0 ymin: -7.081155e-10 xmax: 111319.5 ymax: 111325.1
88c88
< POINT (0 0)
---
> POINT (0 -7.081155e-10)
  Running ‘dist.R’ [2s/2s]
  Comparing ‘dist.Rout’ to ‘dist.Rout.save’ ...28c28
< Units: [m]
---
> Units: m
58c58
< Units: [m]
---
> Units: m
66c66
< 1445346 [m]
---
> 1445346 m
68c68
< 0 [m]
---
> 0 m
88c88
< Units: [m]
---
> Units: m
97c97
< bbox:           xmin: 0 ymin: 0 xmax: 10625.95 ymax: 110823.7
---
> bbox:           xmin: 0 ymin: -7.081155e-10 xmax: 10625.95 ymax: 110823.7
101c101
< MULTIPOINT (505.9977 0, 1517.993 0, 2529.988 0,...
---
> MULTIPOINT (505.9977 -7.081155e-10, 1517.993 -7...
  Running ‘dplyr.R’ [1s/2s]
  Running ‘empty.R’ [1s/2s]
  Comparing ‘empty.Rout’ to ‘empty.Rout.save’ ... OK
  Running ‘gdal_geom.R’ [2s/3s]
  Comparing ‘gdal_geom.Rout’ to ‘gdal_geom.Rout.save’ ...106c106
< GDAL has 85 drivers
---
> GDAL has 80 drivers
  Running ‘geos.R’ [8s/11s]
  Comparing ‘geos.Rout’ to ‘geos.Rout.save’ ...11c11
< Units: [m]
---
> Units: m
255c255
< Units: [m]
---
> Units: m
259c259
< Units: [m]
---
> Units: m
  Running ‘graticule.R’ [2s/3s]
  Running ‘grid.R’ [2s/3s]
  Comparing ‘grid.Rout’ to ‘grid.Rout.save’ ... OK
  Running ‘plot.R’ [1s/1s]
  Running ‘read.R’ [3s/4s]
  Comparing ‘read.Rout’ to ‘read.Rout.save’ ...141c141
< Error in guess_driver(dns) : length(dsn) == 1 is not TRUE
---
> Error : length(dsn) == 1 is not TRUE
334c334
< Reading layer `Parcely' from data source `/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/sf/gml/20170930_OB_530964_UKSH.xml.gz' using driver `GML'
---
> Reading layer `Parcely' from data source `/home/edzer/git/sf.Rcheck/sf/gml/20170930_OB_530964_UKSH.xml.gz' using driver `GML'
352c352
< Reading layer `Parcely' from data source `/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/sf/gml/20170930_OB_530964_UKSH.xml.gz' using driver `GML'
---
> Reading layer `Parcely' from data source `/home/edzer/git/sf.Rcheck/sf/gml/20170930_OB_530964_UKSH.xml.gz' using driver `GML'
384c384
< Reading layer `tst__' from data source `/home/hornik/tmp/R.check/r-devel-gcc/Work/PKGS/sf.Rcheck/tests/tst__.gpkg' using driver `GPKG'
---
> Reading layer `tst__' from data source `/home/edzer/git/sf.Rcheck/tests/tst__.gpkg' using driver `GPKG'
  Running ‘roundtrip.R’ [9s/13s]
  Comparing ‘roundtrip.Rout’ to ‘roundtrip.Rout.save’ ...43a44,46
> Warning message:
> In data.row.names(row.names, rowsi, i) :
>   some row.names duplicated: 2,3,5,6,7,8,10,11,12,13,14,15 --> row.names NOT used
  Running ‘sfc.R’ [1s/2s]
  Running ‘sfg.R’ [1s/2s]
  Comparing ‘sfg.Rout’ to ‘sfg.Rout.save’ ... OK
  Running ‘stars.R’ [1s/2s]
  Comparing ‘stars.Rout’ to ‘stars.Rout.save’ ... OK
  Running ‘testthat.R’ [6s/12s]
  Running ‘units.R’ [1s/2s]
  Comparing ‘units.Rout’ to ‘units.Rout.save’ ...11c11
< 1 [arc_degree]
---
> 1 arc_degree
25,45c25,46
< km : 1 [km]
< m : 1 [m]
< dm : 1 [dm]
< cm : 1 [cm]
< mm : 1 [mm]
< kmi : 1 [nautical_mile]
< in : 1 [in]
< ft : 1 [ft]
< yd : 1 [yd]
< mi : 1 [mi]
< fath : 1 [fathom]
< ch : 1 [chain]
< link : 1 [link]
< us-in : 1 [us_in]
< us-ft : 1 [US_survey_foot]
< us-yd : 1 [US_survey_yard]
< us-ch : 1 [chain]
< us-mi : 1 [US_survey_mile]
< ind-yd : 1 [ind_yd]
< ind-ft : 1 [ind_ft]
< ind-ch : 1 [ind_ch]
---
> km : 1 km
> m : 1 m
> dm : 1 dm
> cm : 1 cm
> mm : 1 mm
> kmi : 1 nautical_mile
> in : 1 in
> ft : 1 ft
> yd : 1 yd
> mi : 1 mi
> fath : 1 fathom
> ch : 1 chain
> link : 1 *m
> us-in : us-ft : 1 US_survey_foot
> us-yd : 1 US_survey_yard
> us-ch : 1 chain
> us-mi : 1 US_survey_mile
> ind-yd : 1 *m
> ind-ft : 1 *m
> ind-ch : 1 ^20*m
> Warning message:
> Could not parse expression: '`1.`/39.37 `m`'. Returning as a single symbolic unit() 
  Running ‘wkb.R’ [1s/2s]
  Comparing ‘wkb.Rout’ to ‘wkb.Rout.save’ ... OK
  Running ‘zzz.R’ [3s/5s]
  Comparing ‘zzz.Rout’ to ‘zzz.Rout.save’ ...6c6
< spatstat 1.56-1       (nickname: 'Invisible Friend') 
---
> spatstat 1.55-1       (nickname: 'Gamble Responsibly') 
Running the tests in ‘tests/dplyr.R’ failed.
Complete output:
  > suppressPackageStartupMessages(library(sf))
  > library(dplyr)
  Error in library(dplyr) : there is no package called 'dplyr'
  Execution halted
Running the tests in ‘tests/graticule.R’ failed.
Complete output:
  > library(maps)
  > m = map('usa', plot = FALSE, fill = TRUE)
  > suppressPackageStartupMessages(library(sf))
  > m0 <- st_as_sfc(m)
  > m <- st_as_sf(m)
  > 
  > laea = st_crs("+proj=laea +lat_0=30 +lon_0=-95") # Lambert equal area
  > m <- st_transform(st_as_sf(m), laea)
  > 
  > bb = st_bbox(m)
  > bbox = st_linestring(rbind(c( bb[1],bb[2]),c( bb[3],bb[2]),c( bb[3],bb[4]),c( bb[1],bb[4]),c( bb[1],bb[2])))
  > 
  > g = st_graticule(m)
  > plot(m, xlim = 1.2 * c(-2450853.4, 2186391.9))
  > plot(g[1], add = TRUE, col = 'grey')
  > plot(bbox, add = TRUE)
  > points(g$x_start, g$y_start, col = 'red')
  > points(g$x_end, g$y_end, col = 'blue')
  > 
  > invisible(lapply(seq_len(nrow(g)), function(i) {
  + 	if (g$type[i] == "N" && g$x_start[i] - min(g$x_start) < 1000)
  + 		text(g[i,"x_start"], g[i,"y_start"], labels = parse(text = g[i,"degree_label"]), 
  + 			srt = g$angle_start[i], pos = 2, cex = .7)
  + 	if (g$type[i] == "E" && g$y_start[i] - min(g$y_start) < 1000)
  + 		text(g[i,"x_start"], g[i,"y_start"], labels = parse(text = g[i,"degree_label"]), 
  + 			srt = g$angle_start[i] - 90, pos = 1, cex = .7)
  + 	if (g$type[i] == "N" && g$x_end[i] - max(g$x_end) > -1000)
  + 		text(g[i,"x_end"], g[i,"y_end"], labels = parse(text = g[i,"degree_label"]), 
  + 			srt = g$angle_end[i], pos = 4, cex = .7)
  + 	if (g$type[i] == "E" && g$y_end[i] - max(g$y_end) > -1000)
  + 		text(g[i,"x_end"], g[i,"y_end"], labels = parse(text = g[i,"degree_label"]), 
  + 			srt = g$angle_end[i] - 90, pos = 3, cex = .7)
  + }))
  > 
  > plot(m, graticule = st_crs(4326))
  > nc = st_read(system.file("shape/nc.shp", package="sf"), quiet = TRUE)
  > # options(warn=2)
  > g = st_graticule(nc, datum = st_crs(nc))
  > #g = st_graticule(nc)
  > 
  > plot(nc[1], graticule = st_crs(nc))
  > 
  > plot(nc[1], graticule = st_crs(nc), axes = TRUE)
  > 
  > g = st_graticule()
  > 
  > library(ggplot2)
  Error in library(ggplot2) : there is no package called 'ggplot2'
  Execution halted
Running the tests in ‘tests/plot.R’ failed.
Complete output:
  > suppressPackageStartupMessages(library(sf))
  > library(dplyr)
  Error in library(dplyr) : there is no package called 'dplyr'
  Execution halted
Running the tests in ‘tests/sfc.R’ failed.
Complete output:
  > suppressPackageStartupMessages(library(sf))
  > library(testthat)
  > 
  > p = st_point(c(1/3,1/6))
  > st_sfc(p, precision = 1000)
  Geometry set for 1 feature 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0.3333333 ymin: 0.1666667 xmax: 0.3333333 ymax: 0.1666667
  epsg (SRID):    NA
  proj4string:    NA
  precision:      1000 
  POINT (0.3333333 0.1666667)
  > st_as_sfc(st_as_binary(st_sfc(p, precision = 0L)))
  Geometry set for 1 feature 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0.3333333 ymin: 0.1666667 xmax: 0.3333333 ymax: 0.1666667
  epsg (SRID):    NA
  proj4string:    NA
  POINT (0.3333333 0.1666667)
  > st_as_sfc(st_as_binary(st_sfc(p, precision = 1000)))
  Geometry set for 1 feature 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0.333 ymin: 0.167 xmax: 0.333 ymax: 0.167
  epsg (SRID):    NA
  proj4string:    NA
  POINT (0.333 0.167)
  > st_as_sfc(st_as_binary(st_sfc(p, precision = 1000000)))
  Geometry set for 1 feature 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0.333333 ymin: 0.166667 xmax: 0.333333 ymax: 0.166667
  epsg (SRID):    NA
  proj4string:    NA
  POINT (0.333333 0.166667)
  > st_as_sfc(st_as_binary(st_sfc(p, precision = 10L)))
  Geometry set for 1 feature 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0.3 ymin: 0.2 xmax: 0.3 ymax: 0.2
  epsg (SRID):    NA
  proj4string:    NA
  POINT (0.3 0.2)
  > st_as_sfc(st_as_binary(st_sfc(p, precision = -1)))
  Geometry set for 1 feature 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0.3333333 ymin: 0.1666667 xmax: 0.3333333 ymax: 0.1666667
  epsg (SRID):    NA
  proj4string:    NA
  POINT (0.3333333 0.1666667)
  > 
  > d = data.frame(a = 1:2)
  > d$geom = c("POINT(0 0)", "POINT(1 1)")
  > 
  > st_as_sf(d, wkt = "geom")
  Simple feature collection with 2 features and 1 field
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 0 xmax: 1 ymax: 1
  epsg (SRID):    NA
  proj4string:    NA
    a        geom
  1 1 POINT (0 0)
  2 2 POINT (1 1)
  > st_as_sf(d, wkt = 2)
  Simple feature collection with 2 features and 1 field
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 0 xmax: 1 ymax: 1
  epsg (SRID):    NA
  proj4string:    NA
    a        geom
  1 1 POINT (0 0)
  2 2 POINT (1 1)
  > st_as_sf(d, wkt = "geom", remove = FALSE)
  Simple feature collection with 2 features and 2 fields
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 0 xmax: 1 ymax: 1
  epsg (SRID):    NA
  proj4string:    NA
    a       geom    geometry
  1 1 POINT(0 0) POINT (0 0)
  2 2 POINT(1 1) POINT (1 1)
  > 
  > st_as_sfc(c("POINT(0 0)", "POINT(1 1)"))
  Geometry set for 2 features 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 0 xmax: 1 ymax: 1
  epsg (SRID):    NA
  proj4string:    NA
  POINT (0 0)
  POINT (1 1)
  > st_as_sfc(c("POINT(0 0)", "POINT(1 1)", "POLYGON((0 0,1 1,0 1,0 0))"))
  Geometry set for 3 features 
  geometry type:  GEOMETRY
  dimension:      XY
  bbox:           xmin: 0 ymin: 0 xmax: 1 ymax: 1
  epsg (SRID):    NA
  proj4string:    NA
  POINT (0 0)
  POINT (1 1)
  POLYGON ((0 0, 1 1, 0 1, 0 0))
  > st_as_sfc(character(0))
  Geometry set for 0 features 
  bbox:           xmin: NA ymin: NA xmax: NA ymax: NA
  epsg (SRID):    NA
  proj4string:    NA
  > st_as_sfc(character(0), 4326)
  Geometry set for 0 features 
  bbox:           xmin: NA ymin: NA xmax: NA ymax: NA
  epsg (SRID):    4326
  proj4string:    +proj=longlat +datum=WGS84 +no_defs
  > st_as_sfc(c("POINT(0 0)", "POINT(1 1)", "POLYGON((0 0,1 1,0 1,0 0))"), 
  + 	"+proj=longlat +datum=WGS84")
  Geometry set for 3 features 
  geometry type:  GEOMETRY
  dimension:      XY
  bbox:           xmin: 0 ymin: 0 xmax: 1 ymax: 1
  epsg (SRID):    4326
  proj4string:    +proj=longlat +datum=WGS84 +no_defs
  POINT (0 0)
  POINT (1 1)
  POLYGON ((0 0, 1 1, 0 1, 0 0))
  > dg = st_as_sf(d, wkt = "geom")
  > print(dg, n = 1)
  Simple feature collection with 2 features and 1 field
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 0 xmax: 1 ymax: 1
  epsg (SRID):    NA
  proj4string:    NA
  First 1 features:
    a        geom
  1 1 POINT (0 0)
  > head(st_as_sf(d, wkt = "geom"), 1)
  Simple feature collection with 1 feature and 1 field
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 0 xmax: 0 ymax: 0
  epsg (SRID):    NA
  proj4string:    NA
    a        geom
  1 1 POINT (0 0)
  > 
  > d$geom = st_as_sfc(d$geom)
  > d1 = d
  > attr(d1, "sf_col") = "geom"
  > st_geometry(d1) = d$geom
  > 
  > d$geometry = d$geom # second geometry list-column
  > expect_warning(st_geometry(d) <- d$geom)
  > d
  Simple feature collection with 2 features and 1 field
  Active geometry column: geom
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 0 xmax: 1 ymax: 1
  epsg (SRID):    NA
  proj4string:    NA
    a        geom    geometry
  1 1 POINT (0 0) POINT (0 0)
  2 2 POINT (1 1) POINT (1 1)
  > 
  > x = st_sfc(list(st_point(0:1), st_point(0:1)), crs = 4326)
  > # don't warn when replacing crs with identical value:
  > st_sfc(x, crs = 4326)
  Geometry set for 2 features 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 1 xmax: 0 ymax: 1
  epsg (SRID):    4326
  proj4string:    +proj=longlat +datum=WGS84 +no_defs
  POINT (0 1)
  POINT (0 1)
  > st_sfc(x, crs = "+proj=longlat +datum=WGS84 +no_defs")
  Geometry set for 2 features 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 1 xmax: 0 ymax: 1
  epsg (SRID):    4326
  proj4string:    +proj=longlat +datum=WGS84 +no_defs
  POINT (0 1)
  POINT (0 1)
  > # but do when it changes:
  > st_sfc(x, crs = 3857)
  Geometry set for 2 features 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 1 xmax: 0 ymax: 1
  epsg (SRID):    3857
  proj4string:    +proj=merc +a=6378137 +b=6378137 +lat_ts=0.0 +lon_0=0.0 +x_0=0.0 +y_0=0 +k=1.0 +units=m +nadgrids=@null +wktext +no_defs
  POINT (0 1)
  POINT (0 1)
  Warning message:
  st_crs<- : replacing crs does not reproject data; use st_transform for that 
  > 
  > p = st_point(0:1)
  > st_cast(p, "MULTIPOINT")
  MULTIPOINT (0 1)
  > mp = st_multipoint(rbind(c(0,1), c(2,2)))
  > st_cast(mp, "POINT")
  POINT (0 1)
  Warning message:
  In st_cast.MULTIPOINT(mp, "POINT") : point from first coordinate only
  > st_cast(mp, "MULTIPOINT")
  MULTIPOINT (0 1, 2 2)
  > 
  > # geometry collection to its elements:
  > st_cast(st_geometrycollection(list(mp)), "POINT")
  POINT (0 1)
  Warning message:
  In st_cast.MULTIPOINT(x[[1]], to, ...) : point from first coordinate only
  > st_cast(st_geometrycollection(list(mp)), "MULTIPOINT")
  MULTIPOINT (0 1, 2 2)
  > st_cast(st_geometrycollection(list(p,mp)), "MULTIPOINT")
  MULTIPOINT (0 1)
  Warning message:
  In st_cast.GEOMETRYCOLLECTION(st_geometrycollection(list(p, mp)),  :
    only first part of geometrycollection is retained
  > 
  > mp = st_multipoint(rbind(c(0,1)))
  > x = st_sfc(p, mp)
  > st_cast(x, "POINT")
  Geometry set for 2 features 
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 1 xmax: 0 ymax: 1
  epsg (SRID):    NA
  proj4string:    NA
  POINT (0 1)
  POINT (0 1)
  Warning message:
  In st_cast.MULTIPOINT(X[[i]], ...) : point from first coordinate only
  > 
  > sf = st_sf(a = 3:2, geom = x)
  > st_cast(sf, "POINT")
  Simple feature collection with 2 features and 1 field
  geometry type:  POINT
  dimension:      XY
  bbox:           xmin: 0 ymin: 1 xmax: 0 ymax: 1
  epsg (SRID):    NA
  proj4string:    NA
    a    geometry
  1 3 POINT (0 1)
  2 2 POINT (0 1)
  Warning message:
  In st_cast.MULTIPOINT(X[[i]], ...) : point from first coordinate only
  > 
  > suppressPackageStartupMessages( library(dplyr) )
  Error in library(dplyr) : there is no package called 'dplyr'
  Calls: suppressPackageStartupMessages -> withCallingHandlers -> library
  Execution halted
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > suppressPackageStartupMessages(library(sf))
  > 
  > test_check("sf")
  ── 1. Error: binary operations work on sf objects with common column names (@tes
  there is no package called 'tibble'
  1: st_as_sf(tibble::as_tibble(sf1)) at testthat/test_geos.R:247
  2: tibble::as_tibble
  3: getExportedValue(pkg, name)
  4: asNamespace(ns)
  5: getNamespace(ns)
  6: loadNamespace(name)
  7: withRestarts(stop(cond), retry_loadNamespace = function() NULL)
  8: withOneRestart(expr, restarts[[1L]])
  9: doWithOneRestart(return(expr), restart)
  
  Cannot open layer foo
  Reading layer `nospatial' from data source `/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/sf/gpkg/nospatial.gpkg' using driver `GPKG'
  Reading layer `nospatial' from data source `/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/sf/gpkg/nospatial.gpkg' using driver `GPKG'
  ── 2. Error: reading non-spatial table works (@test_read.R#169)  ───────────────
  package tibble not available: install first?
  1: expect_is(read_sf(system.file("gpkg/nospatial.gpkg", package = "sf")), "tbl_df") at testthat/test_read.R:169
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: read_sf(system.file("gpkg/nospatial.gpkg", package = "sf"))
  5: stop("package tibble not available: install first?")
  
  OGR: Unsupported geometry type
  Reading layer `nc' from data source `/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages/sf/shape/nc.shp' using driver `ESRI Shapefile'
  Simple feature collection with 100 features and 14 fields
  geometry type:  MULTIPOLYGON
  dimension:      XY
  bbox:           xmin: -84.32385 ymin: 33.88199 xmax: -75.45698 ymax: 36.58965
  epsg (SRID):    4267
  proj4string:    +proj=longlat +datum=NAD27 +no_defs
  ── 3. Error: Can't convert `M` dimension to sp (@test_sp.R#75)  ────────────────
  package tibble not available: install first?
  1: read_sf(system.file("shape/storms_xyzm_feature.shp", package = "sf")) at testthat/test_sp.R:75
  2: stop("package tibble not available: install first?")
  
  ── 4. Error: (unknown) (@test_tidy.R#3)  ───────────────────────────────────────
  there is no package called 'dplyr'
  1: suppressMessages(library(dplyr)) at testthat/test_tidy.R:3
  2: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  3: library(dplyr)
  4: stop(txt, domain = NA)
  
  driver `foo' not available.
  Dataset /home/hornik/tmp/scratch/RtmpR5Yn9B/file9e242715167.gpkg already exists: remove first, use update=TRUE to append,
  delete_layer=TRUE to delete layer, or delete_dsn=TRUE to remove the entire data source before writing.
  Creating layer . failed.
  Failed to create feature 1 in x
  ── 5. Error: delete and update work (#304)  (@test_write.R#66)  ────────────────
  package tibble not available: install first?
  1: expect_silent(x <- read_sf(shp)) at testthat/test_write.R:66
  2: quasi_capture(enquo(object), evaluate_promise)
  3: capture(act$val <- eval_bare(get_expr(quo), get_env(quo)))
  4: withr::with_output_sink(temp, withCallingHandlers(withVisible(code), warning = handle_warning, 
         message = handle_message))
  5: force(code)
  6: withCallingHandlers(withVisible(code), warning = handle_warning, message = handle_message)
  7: withVisible(code)
  8: eval_bare(get_expr(quo), get_env(quo))
  9: read_sf(shp)
  10: stop("package tibble not available: install first?")
  
  Failed to create feature 1 in x
  Failed to create feature 1 in x
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 564 SKIPPED: 46 FAILED: 5
  1. Error: binary operations work on sf objects with common column names (@test_geos.R#247) 
  2. Error: reading non-spatial table works (@test_read.R#169) 
  3. Error: Can't convert `M` dimension to sp (@test_sp.R#75) 
  4. Error: (unknown) (@test_tidy.R#3) 
  5. Error: delete and update work (#304)  (@test_write.R#66) 
  
  Error: testthat unit tests failed
  Execution halted