Last updated on 2022-10-17 07:51:05 CEST.
Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
---|---|---|---|---|---|---|
r-devel-linux-x86_64-debian-clang | 0.5.8 | 33.14 | 313.25 | 346.39 | ERROR | |
r-devel-linux-x86_64-debian-gcc | 0.5.8 | 26.59 | 226.43 | 253.02 | ERROR | |
r-devel-linux-x86_64-fedora-clang | 0.5.8 | 453.34 | ERROR | |||
r-devel-linux-x86_64-fedora-gcc | 0.5.8 | 413.11 | ERROR | |||
r-devel-windows-x86_64 | 0.5.8 | 45.00 | 268.00 | 313.00 | ERROR | |
r-patched-linux-x86_64 | 0.5.8 | OK | ||||
r-release-linux-x86_64 | 0.5.8 | 26.81 | 292.50 | 319.31 | OK | |
r-release-macos-arm64 | 0.5.8 | 81.00 | OK | |||
r-release-macos-x86_64 | 0.5.8 | 114.00 | OK | |||
r-release-windows-x86_64 | 0.5.8 | 62.00 | 292.00 | 354.00 | OK | |
r-oldrel-macos-arm64 | 0.5.8 | 45.00 | OK | |||
r-oldrel-macos-x86_64 | 0.5.8 | 76.00 | OK | |||
r-oldrel-windows-ix86+x86_64 | 0.5.8 | 68.00 | 305.00 | 373.00 | OK |
Version: 0.5.8
Check: tests
Result: ERROR
Running 'rasterList_fitdistr.R' [16s/19s]
Running 'test_crop.R' [30s/33s]
Running the tests in 'tests/rasterList_fitdistr.R' failed.
Complete output:
> # This is a test script for rasterList function
> #
> # Author: Emanuele Cordano
> ###############################################################################
> rm(list=ls())
>
> library(rasterList)
Loading required package: raster
Loading required package: sp
> library(lmom)
>
>
>
> ## TESTING R CODE:
> library(testthat)
> context("Verfiy Probabibilty Distribution")
>
> ## It is Raster Examples:
>
> precf <- system.file("map/precipitation.grd", package="rasterList")
>
> prec <- stack(precf)
>
> ### Or you can use Mekrou examples:
> ## Yearly Precipitaion on Mecrow
>
> precf <- system.file("map/Mekrou_precipitation.grd", package="rasterList")
> pvalf <- system.file("map/Mekrou_pvalkstest.grd", package="rasterList")
>
>
> prec <- stack(precf)
> pval <- raster(pvalf)
>
> ## Set time
>
> time <- as.Date(names(prec),format="X%Y.%m.%d")
> year <- as.character(time,format="X%Y")
Warning message:
In as.character.POSIXt(as.POSIXlt(x), ...) :
as.character(td, ..) no longer obeys a 'format' argument; use format(td, ..) ?
>
> ## Compute Annual Precipitation (sum aggregration)
> yearlyprec <- stackApply(x=prec,fun=sum,indices=year)
>
>
> ## L-moments
>
>
> samlmom <- stack(rasterList(yearlyprec,FUN=samlmu))
>
> ## lmrd plot
>
> lmrd(as.data.frame(samlmom),cex=0.3)
>
>
> ##
> ## These are all parametric distribution described in "lmom" packages:
> ## distribs <- c("exp","gam","gev","glo","gno","gpa","gum","kap","ln3","nor","pe3","wak","wei")
> distribs <- c("gam","pe3")
> pels <- paste("pel",distribs,sep="")
> cdfs <- paste("cdf",distribs,sep="")
> names(pels) <- distribs
> names(cdfs) <- distribs
> ##
> ##
> ##
> nn <- names(pels)
>
> cdfs <- cdfs[nn]
> pels <- pels[nn]
>
> ## FIT AND KSTESTING
> fitPrec_gam <- rasterList(samlmom,FUN=pelgam)
> kstest_gam <- RasterListApply(x=rasterList(yearlyprec),para=fitPrec_gam,y="cdfgam",FUN=ks.test)
There were 31 warnings (use warnings() to see them)
> pvalkstest <- raster(rasterList(kstest_gam,FUN=function(x) {return(x$p.value)}))
> test <- as.vector(pvalkstest-pval)
> test0 <- rep(0,length(test))
>
> #
> #####
> #xxx <- '/STORAGE/projects/R-Packages/rasterList/inst/map/Mekrou_pvalkstest.grd'
> #
> #writeRaster(pvalkstest,file=xxx,overwrite=TRUE)
> #
> #
> #####
> test_that(desc="Testing final Results",code=expect_equal(test,test0, tolerance = .002, scale = 1))
-- Failure (???): Testing final Results ----------------------------------------
`test` not equal to `test0`.
273/273 mismatches (average diff: 0.768)
[1] -0.882 - 0 == -0.882
[2] -0.777 - 0 == -0.777
[3] -0.660 - 0 == -0.660
[4] -0.764 - 0 == -0.764
[5] -0.297 - 0 == -0.297
[6] -0.482 - 0 == -0.482
[7] -0.535 - 0 == -0.535
[8] -0.840 - 0 == -0.840
[9] -0.753 - 0 == -0.753
...
Error in reporter$stop_if_needed() : Test failed
Calls: test_that -> <Anonymous>
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang
Version: 0.5.8
Check: tests
Result: ERROR
Running ‘rasterList_fitdistr.R’ [11s/17s]
Running ‘test_crop.R’ [21s/31s]
Running the tests in ‘tests/rasterList_fitdistr.R’ failed.
Complete output:
> # This is a test script for rasterList function
> #
> # Author: Emanuele Cordano
> ###############################################################################
> rm(list=ls())
>
> library(rasterList)
Loading required package: raster
Loading required package: sp
> library(lmom)
>
>
>
> ## TESTING R CODE:
> library(testthat)
> context("Verfiy Probabibilty Distribution")
>
> ## It is Raster Examples:
>
> precf <- system.file("map/precipitation.grd", package="rasterList")
>
> prec <- stack(precf)
>
> ### Or you can use Mekrou examples:
> ## Yearly Precipitaion on Mecrow
>
> precf <- system.file("map/Mekrou_precipitation.grd", package="rasterList")
> pvalf <- system.file("map/Mekrou_pvalkstest.grd", package="rasterList")
>
>
> prec <- stack(precf)
> pval <- raster(pvalf)
>
> ## Set time
>
> time <- as.Date(names(prec),format="X%Y.%m.%d")
> year <- as.character(time,format="X%Y")
Warning message:
In as.character.POSIXt(as.POSIXlt(x), ...) :
as.character(td, ..) no longer obeys a 'format' argument; use format(td, ..) ?
>
> ## Compute Annual Precipitation (sum aggregration)
> yearlyprec <- stackApply(x=prec,fun=sum,indices=year)
>
>
> ## L-moments
>
>
> samlmom <- stack(rasterList(yearlyprec,FUN=samlmu))
>
> ## lmrd plot
>
> lmrd(as.data.frame(samlmom),cex=0.3)
>
>
> ##
> ## These are all parametric distribution described in "lmom" packages:
> ## distribs <- c("exp","gam","gev","glo","gno","gpa","gum","kap","ln3","nor","pe3","wak","wei")
> distribs <- c("gam","pe3")
> pels <- paste("pel",distribs,sep="")
> cdfs <- paste("cdf",distribs,sep="")
> names(pels) <- distribs
> names(cdfs) <- distribs
> ##
> ##
> ##
> nn <- names(pels)
>
> cdfs <- cdfs[nn]
> pels <- pels[nn]
>
> ## FIT AND KSTESTING
> fitPrec_gam <- rasterList(samlmom,FUN=pelgam)
> kstest_gam <- RasterListApply(x=rasterList(yearlyprec),para=fitPrec_gam,y="cdfgam",FUN=ks.test)
There were 31 warnings (use warnings() to see them)
> pvalkstest <- raster(rasterList(kstest_gam,FUN=function(x) {return(x$p.value)}))
> test <- as.vector(pvalkstest-pval)
> test0 <- rep(0,length(test))
>
> #
> #####
> #xxx <- '/STORAGE/projects/R-Packages/rasterList/inst/map/Mekrou_pvalkstest.grd'
> #
> #writeRaster(pvalkstest,file=xxx,overwrite=TRUE)
> #
> #
> #####
> test_that(desc="Testing final Results",code=expect_equal(test,test0, tolerance = .002, scale = 1))
── Failure (???): Testing final Results ────────────────────────────────────────
`test` not equal to `test0`.
273/273 mismatches (average diff: 0.768)
[1] -0.882 - 0 == -0.882
[2] -0.777 - 0 == -0.777
[3] -0.660 - 0 == -0.660
[4] -0.764 - 0 == -0.764
[5] -0.297 - 0 == -0.297
[6] -0.482 - 0 == -0.482
[7] -0.535 - 0 == -0.535
[8] -0.840 - 0 == -0.840
[9] -0.753 - 0 == -0.753
...
Error in reporter$stop_if_needed() : Test failed
Calls: test_that -> <Anonymous>
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.5.8
Check: tests
Result: ERROR
Running ‘rasterList_fitdistr.R’ [19s/25s]
Running ‘test_crop.R’ [38s/49s]
Running the tests in ‘tests/rasterList_fitdistr.R’ failed.
Complete output:
> # This is a test script for rasterList function
> #
> # Author: Emanuele Cordano
> ###############################################################################
> rm(list=ls())
>
> library(rasterList)
Loading required package: raster
Loading required package: sp
> library(lmom)
>
>
>
> ## TESTING R CODE:
> library(testthat)
> context("Verfiy Probabibilty Distribution")
>
> ## It is Raster Examples:
>
> precf <- system.file("map/precipitation.grd", package="rasterList")
>
> prec <- stack(precf)
>
> ### Or you can use Mekrou examples:
> ## Yearly Precipitaion on Mecrow
>
> precf <- system.file("map/Mekrou_precipitation.grd", package="rasterList")
> pvalf <- system.file("map/Mekrou_pvalkstest.grd", package="rasterList")
>
>
> prec <- stack(precf)
> pval <- raster(pvalf)
>
> ## Set time
>
> time <- as.Date(names(prec),format="X%Y.%m.%d")
> year <- as.character(time,format="X%Y")
Warning message:
In as.character.POSIXt(as.POSIXlt(x), ...) :
as.character(td, ..) no longer obeys a 'format' argument; use format(td, ..) ?
>
> ## Compute Annual Precipitation (sum aggregration)
> yearlyprec <- stackApply(x=prec,fun=sum,indices=year)
>
>
> ## L-moments
>
>
> samlmom <- stack(rasterList(yearlyprec,FUN=samlmu))
>
> ## lmrd plot
>
> lmrd(as.data.frame(samlmom),cex=0.3)
>
>
> ##
> ## These are all parametric distribution described in "lmom" packages:
> ## distribs <- c("exp","gam","gev","glo","gno","gpa","gum","kap","ln3","nor","pe3","wak","wei")
> distribs <- c("gam","pe3")
> pels <- paste("pel",distribs,sep="")
> cdfs <- paste("cdf",distribs,sep="")
> names(pels) <- distribs
> names(cdfs) <- distribs
> ##
> ##
> ##
> nn <- names(pels)
>
> cdfs <- cdfs[nn]
> pels <- pels[nn]
>
> ## FIT AND KSTESTING
> fitPrec_gam <- rasterList(samlmom,FUN=pelgam)
> kstest_gam <- RasterListApply(x=rasterList(yearlyprec),para=fitPrec_gam,y="cdfgam",FUN=ks.test)
There were 31 warnings (use warnings() to see them)
> pvalkstest <- raster(rasterList(kstest_gam,FUN=function(x) {return(x$p.value)}))
> test <- as.vector(pvalkstest-pval)
> test0 <- rep(0,length(test))
>
> #
> #####
> #xxx <- '/STORAGE/projects/R-Packages/rasterList/inst/map/Mekrou_pvalkstest.grd'
> #
> #writeRaster(pvalkstest,file=xxx,overwrite=TRUE)
> #
> #
> #####
> test_that(desc="Testing final Results",code=expect_equal(test,test0, tolerance = .002, scale = 1))
── Failure (???): Testing final Results ────────────────────────────────────────
`test` not equal to `test0`.
273/273 mismatches (average diff: 0.768)
[1] -0.882 - 0 == -0.882
[2] -0.777 - 0 == -0.777
[3] -0.660 - 0 == -0.660
[4] -0.764 - 0 == -0.764
[5] -0.297 - 0 == -0.297
[6] -0.482 - 0 == -0.482
[7] -0.535 - 0 == -0.535
[8] -0.840 - 0 == -0.840
[9] -0.753 - 0 == -0.753
...
Error in reporter$stop_if_needed() : Test failed
Calls: test_that -> <Anonymous>
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 0.5.8
Check: tests
Result: ERROR
Running ‘rasterList_fitdistr.R’ [18s/22s]
Running ‘test_crop.R’ [35s/41s]
Running the tests in ‘tests/rasterList_fitdistr.R’ failed.
Complete output:
> # This is a test script for rasterList function
> #
> # Author: Emanuele Cordano
> ###############################################################################
> rm(list=ls())
>
> library(rasterList)
Loading required package: raster
Loading required package: sp
> library(lmom)
>
>
>
> ## TESTING R CODE:
> library(testthat)
> context("Verfiy Probabibilty Distribution")
>
> ## It is Raster Examples:
>
> precf <- system.file("map/precipitation.grd", package="rasterList")
>
> prec <- stack(precf)
>
> ### Or you can use Mekrou examples:
> ## Yearly Precipitaion on Mecrow
>
> precf <- system.file("map/Mekrou_precipitation.grd", package="rasterList")
> pvalf <- system.file("map/Mekrou_pvalkstest.grd", package="rasterList")
>
>
> prec <- stack(precf)
> pval <- raster(pvalf)
>
> ## Set time
>
> time <- as.Date(names(prec),format="X%Y.%m.%d")
> year <- as.character(time,format="X%Y")
Warning message:
In as.character.POSIXt(as.POSIXlt(x), ...) :
as.character(td, ..) no longer obeys a 'format' argument; use format(td, ..) ?
>
> ## Compute Annual Precipitation (sum aggregration)
> yearlyprec <- stackApply(x=prec,fun=sum,indices=year)
>
>
> ## L-moments
>
>
> samlmom <- stack(rasterList(yearlyprec,FUN=samlmu))
>
> ## lmrd plot
>
> lmrd(as.data.frame(samlmom),cex=0.3)
>
>
> ##
> ## These are all parametric distribution described in "lmom" packages:
> ## distribs <- c("exp","gam","gev","glo","gno","gpa","gum","kap","ln3","nor","pe3","wak","wei")
> distribs <- c("gam","pe3")
> pels <- paste("pel",distribs,sep="")
> cdfs <- paste("cdf",distribs,sep="")
> names(pels) <- distribs
> names(cdfs) <- distribs
> ##
> ##
> ##
> nn <- names(pels)
>
> cdfs <- cdfs[nn]
> pels <- pels[nn]
>
> ## FIT AND KSTESTING
> fitPrec_gam <- rasterList(samlmom,FUN=pelgam)
> kstest_gam <- RasterListApply(x=rasterList(yearlyprec),para=fitPrec_gam,y="cdfgam",FUN=ks.test)
There were 31 warnings (use warnings() to see them)
> pvalkstest <- raster(rasterList(kstest_gam,FUN=function(x) {return(x$p.value)}))
> test <- as.vector(pvalkstest-pval)
> test0 <- rep(0,length(test))
>
> #
> #####
> #xxx <- '/STORAGE/projects/R-Packages/rasterList/inst/map/Mekrou_pvalkstest.grd'
> #
> #writeRaster(pvalkstest,file=xxx,overwrite=TRUE)
> #
> #
> #####
> test_that(desc="Testing final Results",code=expect_equal(test,test0, tolerance = .002, scale = 1))
── Failure (???): Testing final Results ────────────────────────────────────────
`test` not equal to `test0`.
273/273 mismatches (average diff: 0.768)
[1] -0.882 - 0 == -0.882
[2] -0.777 - 0 == -0.777
[3] -0.660 - 0 == -0.660
[4] -0.764 - 0 == -0.764
[5] -0.297 - 0 == -0.297
[6] -0.482 - 0 == -0.482
[7] -0.535 - 0 == -0.535
[8] -0.840 - 0 == -0.840
[9] -0.753 - 0 == -0.753
...
Error in reporter$stop_if_needed() : Test failed
Calls: test_that -> <Anonymous>
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 0.5.8
Check: tests
Result: ERROR
Running 'rasterList_fitdistr.R' [14s]
Running 'test_crop.R' [28s]
Running the tests in 'tests/rasterList_fitdistr.R' failed.
Complete output:
> # This is a test script for rasterList function
> #
> # Author: Emanuele Cordano
> ###############################################################################
> rm(list=ls())
>
> library(rasterList)
Loading required package: raster
Loading required package: sp
> library(lmom)
>
>
>
> ## TESTING R CODE:
> library(testthat)
> context("Verfiy Probabibilty Distribution")
>
> ## It is Raster Examples:
>
> precf <- system.file("map/precipitation.grd", package="rasterList")
>
> prec <- stack(precf)
>
> ### Or you can use Mekrou examples:
> ## Yearly Precipitaion on Mecrow
>
> precf <- system.file("map/Mekrou_precipitation.grd", package="rasterList")
> pvalf <- system.file("map/Mekrou_pvalkstest.grd", package="rasterList")
>
>
> prec <- stack(precf)
> pval <- raster(pvalf)
>
> ## Set time
>
> time <- as.Date(names(prec),format="X%Y.%m.%d")
> year <- as.character(time,format="X%Y")
Warning message:
In as.character.POSIXt(as.POSIXlt(x), ...) :
as.character(td, ..) no longer obeys a 'format' argument; use format(td, ..) ?
>
> ## Compute Annual Precipitation (sum aggregration)
> yearlyprec <- stackApply(x=prec,fun=sum,indices=year)
>
>
> ## L-moments
>
>
> samlmom <- stack(rasterList(yearlyprec,FUN=samlmu))
>
> ## lmrd plot
>
> lmrd(as.data.frame(samlmom),cex=0.3)
>
>
> ##
> ## These are all parametric distribution described in "lmom" packages:
> ## distribs <- c("exp","gam","gev","glo","gno","gpa","gum","kap","ln3","nor","pe3","wak","wei")
> distribs <- c("gam","pe3")
> pels <- paste("pel",distribs,sep="")
> cdfs <- paste("cdf",distribs,sep="")
> names(pels) <- distribs
> names(cdfs) <- distribs
> ##
> ##
> ##
> nn <- names(pels)
>
> cdfs <- cdfs[nn]
> pels <- pels[nn]
>
> ## FIT AND KSTESTING
> fitPrec_gam <- rasterList(samlmom,FUN=pelgam)
> kstest_gam <- RasterListApply(x=rasterList(yearlyprec),para=fitPrec_gam,y="cdfgam",FUN=ks.test)
There were 31 warnings (use warnings() to see them)
> pvalkstest <- raster(rasterList(kstest_gam,FUN=function(x) {return(x$p.value)}))
> test <- as.vector(pvalkstest-pval)
> test0 <- rep(0,length(test))
>
> #
> #####
> #xxx <- '/STORAGE/projects/R-Packages/rasterList/inst/map/Mekrou_pvalkstest.grd'
> #
> #writeRaster(pvalkstest,file=xxx,overwrite=TRUE)
> #
> #
> #####
> test_that(desc="Testing final Results",code=expect_equal(test,test0, tolerance = .002, scale = 1))
── Failure (???): Testing final Results ────────────────────────────────────────
`test` not equal to `test0`.
273/273 mismatches (average diff: 0.768)
[1] -0.882 - 0 == -0.882
[2] -0.777 - 0 == -0.777
[3] -0.660 - 0 == -0.660
[4] -0.764 - 0 == -0.764
[5] -0.297 - 0 == -0.297
[6] -0.482 - 0 == -0.482
[7] -0.535 - 0 == -0.535
[8] -0.840 - 0 == -0.840
[9] -0.753 - 0 == -0.753
...
Error in reporter$stop_if_needed() : Test failed
Calls: test_that -> <Anonymous>
Execution halted
Flavor: r-devel-windows-x86_64