CRAN Package Check Results for Package FADA

Last updated on 2019-11-26 00:51:51 CET.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 1.3.4 8.61 60.16 68.77 ERROR
r-devel-linux-x86_64-debian-gcc 1.3.4 6.69 48.83 55.52 ERROR
r-devel-linux-x86_64-fedora-clang 1.3.4 91.32 OK
r-devel-linux-x86_64-fedora-gcc 1.3.4 92.43 OK
r-devel-windows-ix86+x86_64 1.3.4 21.00 109.00 130.00 OK
r-devel-windows-ix86+x86_64-gcc8 1.3.4 14.00 75.00 89.00 OK
r-patched-linux-x86_64 1.3.4 7.69 69.93 77.62 OK
r-patched-solaris-x86 1.3.4 136.80 OK
r-release-linux-x86_64 1.3.4 6.87 70.90 77.77 OK
r-release-windows-ix86+x86_64 1.3.4 18.00 82.00 100.00 OK
r-release-osx-x86_64 1.3.4 OK
r-oldrel-windows-ix86+x86_64 1.3.4 7.00 102.00 109.00 OK
r-oldrel-osx-x86_64 1.3.4 OK

Check Details

Version: 1.3.4
Check: examples
Result: ERROR
    Running examples in 'FADA-Ex.R' failed
    The error most likely occurred in:
    
    > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
    > ### Name: FADA
    > ### Title: Factor Adjusted Discriminant Analysis 3-4 : Supervised
    > ### classification on decorrelated data
    > ### Aliases: FADA
    >
    > ### ** Examples
    >
    > data(data.train)
    > data(data.test)
    >
    > # When testing data set is provided
    > res = decorrelate.train(data.train)
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
    :
     --- package (from environment) ---
    FADA
     --- call from context ---
    ifa(Psi, B)
     --- call from argument ---
    if (class(B) == "numeric") B = matrix(B, ncol = 1)
     --- R stacktrace ---
    where 1: ifa(Psi, B)
    where 2: FUN(X[[i]], ...)
    where 3: lapply(1:maxnbfactors, emfa.nbf, csdata = csdata, S = S, eig = eig,
     vy = vy, minerr = minerr, EM = EM, verbose = FALSE)
    where 4: nbfactors(scale(cdta, center = FALSE, scale = TRUE), maxnbfactors = maxnbfactors,
     EM = EM, diagnostic.plot = diagnostic.plot, jumps.nbfactor = 0.05)
    where 5: decorrelate.train(data.train)
    
     --- value of length: 2 type: logical ---
    [1] FALSE FALSE
     --- function from context ---
    function (Psi, B)
    {
     if (class(B) == "numeric")
     B = matrix(B, ncol = 1)
     q = ncol(B)
     Phi = rep(0, length(Psi))
     Phi[abs(Psi) > 1e-05] = 1/Psi[abs(Psi) > 1e-05]
     PhiB = tcrossprod(Phi, rep(1, q))
     PhiB = PhiB * B
     G = diag(q) + t(B) %*% PhiB
     GinvtPhiB = tcrossprod(solve(G), PhiB)
     Phib2 = tcrossprod(PhiB, t(GinvtPhiB))
     iS = diag(Phi) - Phib2
     PhiB2 = crossprod(PhiB, B)
     GinvtPhiB2 = crossprod(solve(G), PhiB2)
     Phib2 = tcrossprod(PhiB, t(GinvtPhiB2))
     iSB = PhiB - Phib2
     return(list(iS = iS, iSB = iSB))
    }
    <bytecode: 0xaf1f328>
    <environment: namespace:FADA>
     --- function search by body ---
    Function ifa in namespace FADA has this body.
     ----------- END OF FAILURE REPORT --------------
    Fatal error: the condition has length > 1
Flavor: r-devel-linux-x86_64-debian-clang

Version: 1.3.4
Check: examples
Result: ERROR
    Running examples in ‘FADA-Ex.R’ failed
    The error most likely occurred in:
    
    > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
    > ### Name: FADA
    > ### Title: Factor Adjusted Discriminant Analysis 3-4 : Supervised
    > ### classification on decorrelated data
    > ### Aliases: FADA
    >
    > ### ** Examples
    >
    > data(data.train)
    > data(data.test)
    >
    > # When testing data set is provided
    > res = decorrelate.train(data.train)
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
    :
     --- package (from environment) ---
    FADA
     --- call from context ---
    ifa(Psi, B)
     --- call from argument ---
    if (class(B) == "numeric") B = matrix(B, ncol = 1)
     --- R stacktrace ---
    where 1: ifa(Psi, B)
    where 2: FUN(X[[i]], ...)
    where 3: lapply(1:maxnbfactors, emfa.nbf, csdata = csdata, S = S, eig = eig,
     vy = vy, minerr = minerr, EM = EM, verbose = FALSE)
    where 4: nbfactors(scale(cdta, center = FALSE, scale = TRUE), maxnbfactors = maxnbfactors,
     EM = EM, diagnostic.plot = diagnostic.plot, jumps.nbfactor = 0.05)
    where 5: decorrelate.train(data.train)
    
     --- value of length: 2 type: logical ---
    [1] FALSE FALSE
     --- function from context ---
    function (Psi, B)
    {
     if (class(B) == "numeric")
     B = matrix(B, ncol = 1)
     q = ncol(B)
     Phi = rep(0, length(Psi))
     Phi[abs(Psi) > 1e-05] = 1/Psi[abs(Psi) > 1e-05]
     PhiB = tcrossprod(Phi, rep(1, q))
     PhiB = PhiB * B
     G = diag(q) + t(B) %*% PhiB
     GinvtPhiB = tcrossprod(solve(G), PhiB)
     Phib2 = tcrossprod(PhiB, t(GinvtPhiB))
     iS = diag(Phi) - Phib2
     PhiB2 = crossprod(PhiB, B)
     GinvtPhiB2 = crossprod(solve(G), PhiB2)
     Phib2 = tcrossprod(PhiB, t(GinvtPhiB2))
     iSB = PhiB - Phib2
     return(list(iS = iS, iSB = iSB))
    }
    <bytecode: 0x5606da0dd098>
    <environment: namespace:FADA>
     --- function search by body ---
    Function ifa in namespace FADA has this body.
     ----------- END OF FAILURE REPORT --------------
    Fatal error: the condition has length > 1
Flavor: r-devel-linux-x86_64-debian-gcc