Hi Robert, Would you have some update on this? Actually, I was able to reproduce the problem even the R-upstream way -- logs pasted below, and hence this does not look like an issue just for us. Any help is appreciated. Regards, Nilesh ``` > library('raster') Loading required package: sp > print(sessionInfo()) R version 4.1.2 (2021-11-01) Platform: x86_64-pc-linux-gnu (64-bit) Running under: Debian GNU/Linux bookworm/sid Matrix products: default BLAS: /usr/lib/x86_64-linux-gnu/blas/libblas.so.3.10.0 LAPACK: /usr/lib/x86_64-linux-gnu/lapack/liblapack.so.3.10.0 locale: [1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C [3] LC_TIME=en_US.UTF-8 LC_COLLATE=en_US.UTF-8 [5] LC_MONETARY=en_US.UTF-8 LC_MESSAGES=en_US.UTF-8 [7] LC_PAPER=en_US.UTF-8 LC_NAME=C [9] LC_ADDRESS=C LC_TELEPHONE=C [11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C attached base packages: [1] stats graphics grDevices utils datasets methods base other attached packages: [1] raster_3.5-2 sp_1.4-5 loaded via a namespace (and not attached): [1] compiler_4.1.2 Rcpp_1.0.7 codetools_0.2-18 grid_4.1.2 [5] lattice_0.20-45 terra_1.4-11 > print(.libPaths()) [1] "/home/nilesh/R/x86_64-pc-linux-gnu-library/4.1" [2] "/usr/local/lib/R/site-library" [3] "/usr/lib/R/site-library" [4] "/usr/lib/R/library" > library('testthat') > test_check('satellite') Loading required package: satellite ══ Skipped tests ════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════ • empty test (12) ══ Failed tests ═════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════ ── Error (test-extend.R:9:1): (code run outside of `test_that()`) ─────────────────────────── Error in `(function (classes, fdef, mtable) { methods <- .findInheritedMethods(classes, fdef, mtable) if (length(methods) == 1L) return(methods[[1L]]) else if (length(methods) == 0L) { cnames <- paste0("\"", vapply(classes, as.character, ""), "\"", collapse = ", ") stop(gettextf("unable to find an inherited method for function %s for signature %s", sQuote(fdef@generic), sQuote(cnames)), domain = NA) } else stop("Internal error in finding inherited methods; didn't return a unique method", domain = NA) })(list(structure("Satellite", package = "satellite")), new("standardGeneric", .Data = function (x, y, ...) standardGeneric("extend"), generic = structure("extend", package = "terra"), package = "terra", group = list(), valueClass = character(0), signature = c("x", "y"), default = NULL, skeleton = (function (x, y, ...) stop("invalid call in method dispatch to 'extend' (no default method)", domain = NA))(x, y, ...)), <environment>)`: unable to find an inherited method for function ‘extend’ for signature ‘"Satellite"’ Backtrace: █ 1. └─terra::extend(sat, ext_ggs) test-extend.R:9:0 2. └─(function (classes, fdef, mtable) ... [ FAIL 1 | WARN 0 | SKIP 12 | PASS 139 ] ```
Attachment:
signature.asc
Description: PGP signature