Last updated on 2020-01-20 01:50:16 CET.
Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
---|---|---|---|---|---|---|
r-devel-linux-x86_64-debian-clang | 0.37.1 | 9.11 | 72.26 | 81.37 | ERROR | |
r-devel-linux-x86_64-debian-gcc | 0.37.1 | 7.70 | 56.60 | 64.30 | OK | |
r-devel-linux-x86_64-fedora-clang | 0.37.1 | 100.31 | OK | |||
r-devel-linux-x86_64-fedora-gcc | 0.37.1 | 99.28 | OK | |||
r-devel-windows-ix86+x86_64 | 0.37.1 | 22.00 | 122.00 | 144.00 | OK | |
r-devel-windows-ix86+x86_64-gcc8 | 0.37.1 | 14.00 | 98.00 | 112.00 | OK | |
r-patched-linux-x86_64 | 0.37.1 | 6.89 | 64.41 | 71.30 | OK | |
r-patched-solaris-x86 | 0.37.1 | 131.00 | OK | |||
r-release-linux-x86_64 | 0.37.1 | 7.53 | 65.41 | 72.94 | OK | |
r-release-windows-ix86+x86_64 | 0.37.1 | 20.00 | 80.00 | 100.00 | OK | |
r-release-osx-x86_64 | 0.37.1 | OK | ||||
r-oldrel-windows-ix86+x86_64 | 0.37.1 | 10.00 | 78.00 | 88.00 | OK | |
r-oldrel-osx-x86_64 | 0.37.1 | OK |
Version: 0.37.1
Check: examples
Result: ERROR
Running examples in 'bestglm-Ex.R' failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: oneSDRule
> ### Title: Utility function. Implements the 1-sd rule.
> ### Aliases: oneSDRule
>
> ### ** Examples
>
> CV<-c(1.4637799,0.7036285,0.6242480,0.6069406,0.6006877,0.6005472,0.5707958,
+ 0.5907897,0.5895489)
> CVsd<-c(0.24878992,0.14160499,0.08714908,0.11376041,0.08522291,
+ 0.11897327,0.07960879,0.09235052,0.12860983)
> CVout <- matrix(c(CV,CVsd), ncol=2)
> oneSDRule(CVout)
----------- FAILURE REPORT --------------
--- failure: the condition has length > 1 ---
--- srcref ---
:
--- package (from environment) ---
bestglm
--- call from context ---
oneSDRule(CVout)
--- call from argument ---
if (class(CVout) == "train") {
ans <- CVout
CVout <- with(ans$results, cbind(RMSE, RMSESD))
}
--- R stacktrace ---
where 1: oneSDRule(CVout)
--- value of length: 2 type: logical ---
[1] FALSE FALSE
--- function from context ---
function (CVout)
{
stopifnot(is.matrix(CVout) || is.data.frame(CVout) || class(CVout) ==
"train")
if (class(CVout) == "train") {
ans <- CVout
CVout <- with(ans$results, cbind(RMSE, RMSESD))
}
cverrs <- CVout[, 1]
indMin <- which.min(cverrs)
fmin <- CVout[indMin, 2]
cutOff <- fmin + cverrs[indMin]
min(which(cverrs < cutOff))
}
<bytecode: 0xb2cf148>
<environment: namespace:bestglm>
--- function search by body ---
Function oneSDRule in namespace bestglm has this body.
----------- END OF FAILURE REPORT --------------
Error in if (class(CVout) == "train") { : the condition has length > 1
Calls: oneSDRule
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang