CRAN Package Check Results for Package NonCompart

Last updated on 2024-03-28 06:01:31 CET.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 0.7.0 3.56 34.55 38.11 OK
r-devel-linux-x86_64-debian-gcc 0.7.0 2.99 26.51 29.50 OK
r-devel-linux-x86_64-fedora-clang 0.7.0 48.17 OK
r-devel-linux-x86_64-fedora-gcc 0.7.0 47.10 OK
r-devel-windows-x86_64 0.7.0 5.00 210.00 215.00 ERROR
r-patched-linux-x86_64 0.7.0 5.14 33.30 38.44 OK
r-release-linux-x86_64 0.7.0 3.26 33.59 36.85 OK
r-release-macos-arm64 0.7.0 23.00 OK
r-release-macos-x86_64 0.7.0 53.00 OK
r-release-windows-x86_64 0.7.0 12.00 50.00 62.00 OK
r-oldrel-macos-arm64 0.7.0 22.00 OK
r-oldrel-windows-x86_64 0.7.0 11.00 53.00 64.00 OK

Check Details

Version: 0.7.0
Check: tests
Result: ERROR Running 'Test.R' [166s] Running the tests in 'tests/Test.R' failed. Complete output: > require(NonCompart) Loading required package: NonCompart > RptCfg = read.csv("RptCfg.csv", as.is=TRUE) > > Equal = function(Wres, Rres, Tol=0.001) + { + Wres[,"ID"] = as.character(Wres[,"Subject"]) + ColName0 = colnames(Rres) + rownames(RptCfg) = RptCfg[,"PPTESTCD"] + colnames(Rres) = c(ColName0[1], RptCfg[ColName0[-1],"WNL"]) + Inter = intersect(colnames(Wres), colnames(Rres)) + + IsSame = TRUE + for (i in 1:nrow(Wres)) { + for (j in Inter) { + R = as.numeric(Rres[i,j]) + W = as.numeric(Wres[i,j]) + if (W != 0) { + if(abs((R - W)/W) > Tol) { + print(Wres[i,j]) + print(Rres[i,j]) + IsSame = FALSE + } + } + } + } + return(IsSame) + } > > Theoph[,"Subject"] = as.numeric(as.character(Theoph[,"Subject"])) > Indometh[,"Subject"] = as.numeric(as.character(Indometh[,"Subject"])) > > Wres = read.csv("Final_Parameters_Pivoted_Theoph_Linear.csv") > Rres = tblNCA(Theoph, "Subject", "Time", "conc", dose=320, concUnit="mg/L") > if (!Equal(Wres, Rres)) stop("Test Failed!") > > Wres = read.csv("Final_Parameters_Pivoted_Theoph_Log.csv") > Rres = tblNCA(Theoph, "Subject", "Time", "conc", dose=320, down="Log", concUnit="mg/L") > if (!Equal(Wres, Rres)) stop("Test Failed!") > > Wres = read.csv("Final_Parameters_Pivoted_Indometh_Linear.csv") > Rres = tblNCA(Indometh, "Subject", "time", "conc", dose=25, adm="Bolus", concUnit="mg/L", R2ADJ=0.8) > if (!Equal(Wres, Rres)) stop("Test Failed!") > > Wres = read.csv("Final_Parameters_Pivoted_Indometh_Log.csv") > Rres = tblNCA(Indometh, "Subject", "time", "conc", dose=25, adm="Bolus", down="Log", concUnit="mg/L", R2ADJ=0.8) > if (!Equal(Wres, Rres)) stop("Test Failed!") > > Wres = read.csv("Final_Parameters_Pivoted_Indometh_Linear_Infusion.csv") > Rres = tblNCA(Indometh, "Subject", "time", "conc", dose=25, adm="Infusion", dur=0.25, concUnit="mg/L", R2ADJ=0.8) > if (!Equal(Wres, Rres)) stop("Test Failed!") > > Wres = read.csv("Final_Parameters_Pivoted_Indometh_Log_Infusion.csv") > Rres = tblNCA(Indometh, "Subject", "time", "conc", dose=25, adm="Infusion", dur=0.25, down="Log", concUnit="mg/L", R2ADJ=0.8) > if (!Equal(Wres, Rres)) stop("Test Failed!") > > Wres = read.csv("Final_Parameters_Pivoted_Indometh_Linear_Wrong_Extravascular.csv") > Rres = tblNCA(Indometh, "Subject", "time", "conc", dose=25, concUnit="mg/L", R2ADJ=0.8) > if (!Equal(Wres, Rres)) stop("Test Failed!") > > Wres = read.csv("Final_Parameters_Pivoted_Indometh_Log_Wrong_Extravascular.csv") > Rres = tblNCA(Indometh, "Subject", "time", "conc", dose=25, down="Log", concUnit="mg/L", R2ADJ=0.8) > if (!Equal(Wres, Rres)) stop("Test Failed!") > > proc.time() user system elapsed 1.51 0.04 1.56 Flavor: r-devel-windows-x86_64