CRAN Package Check Results for Package YPmodel

Last updated on 2020-02-19 10:49:15 CET.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 1.3 4.03 31.95 35.98 ERROR
r-devel-linux-x86_64-debian-gcc 1.3 3.86 24.68 28.54 ERROR
r-devel-linux-x86_64-fedora-clang 1.3 43.88 ERROR
r-devel-linux-x86_64-fedora-gcc 1.3 45.36 ERROR
r-devel-windows-ix86+x86_64 1.3 7.00 41.00 48.00 OK
r-devel-windows-ix86+x86_64-gcc8 1.3 12.00 52.00 64.00 OK
r-patched-linux-x86_64 1.3 3.72 29.23 32.95 OK
r-patched-solaris-x86 1.3 56.30 OK
r-release-linux-x86_64 1.3 3.34 29.27 32.61 OK
r-release-windows-ix86+x86_64 1.3 7.00 56.00 63.00 OK
r-release-osx-x86_64 1.3 OK
r-oldrel-windows-ix86+x86_64 1.3 5.00 35.00 40.00 OK
r-oldrel-osx-x86_64 1.3 OK

Check Details

Version: 1.3
Check: examples
Result: ERROR
    Running examples in 'YPmodel-Ex.R' failed
    The error most likely occurred in:
    
    > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
    > ### Name: YPmodel-package
    > ### Title: The short-term and long-term hazard ratio model for survival
    > ### data
    > ### Aliases: YPmodel-package
    > ### Keywords: Survival analysis
    >
    > ### ** Examples
    >
    > library(YPmodel)
    > data(gastric)
    > YPmodel(gastric, repNum=100)
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
    :
     --- package (from environment) ---
    YPmodel
     --- call from context ---
    fun.flipud(s1)
     --- call from argument ---
    if (class(data) != "matrix") {
     data <- matrix(data, nrow = length(data), ncol = 1)
    }
     --- R stacktrace ---
    where 1: fun.flipud(s1)
    where 2: fun.cumsum(fun.flipud(s1))
    where 3: fun.flipud(fun.cumsum(fun.flipud(s1)))
    where 4: fun.adlgrk(beta, r, Data)
    where 5: YPmodel.adlgrk(data = data, Estimate = Estimate)
    where 6: YPmodel.default(gastric, repNum = 100)
    where 7: YPmodel(gastric, repNum = 100)
    
     --- value of length: 2 type: logical ---
    [1] FALSE TRUE
     --- function from context ---
    function (data)
    {
     if (class(data) != "matrix") {
     data <- matrix(data, nrow = length(data), ncol = 1)
     }
     size <- dim(data)
     Output <- data
     for (j in 1:size[2]) {
     for (i in 1:size[1]) {
     Output[i, j] <- data[size[1] + 1 - i, j]
     }
     }
     return(Output)
    }
    <bytecode: 0x14de360>
    <environment: namespace:YPmodel>
     --- function search by body ---
    Function fun.flipud in namespace YPmodel has this body.
     ----------- END OF FAILURE REPORT --------------
    Error in if (class(data) != "matrix") { : the condition has length > 1
    Calls: YPmodel ... fun.adlgrk -> fun.flipud -> fun.cumsum -> fun.flipud
    Execution halted
Flavor: r-devel-linux-x86_64-debian-clang

Version: 1.3
Check: examples
Result: ERROR
    Running examples in ‘YPmodel-Ex.R’ failed
    The error most likely occurred in:
    
    > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
    > ### Name: YPmodel-package
    > ### Title: The short-term and long-term hazard ratio model for survival
    > ### data
    > ### Aliases: YPmodel-package
    > ### Keywords: Survival analysis
    >
    > ### ** Examples
    >
    > library(YPmodel)
    > data(gastric)
    > YPmodel(gastric, repNum=100)
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
    :
     --- package (from environment) ---
    YPmodel
     --- call from context ---
    fun.flipud(s1)
     --- call from argument ---
    if (class(data) != "matrix") {
     data <- matrix(data, nrow = length(data), ncol = 1)
    }
     --- R stacktrace ---
    where 1: fun.flipud(s1)
    where 2: fun.cumsum(fun.flipud(s1))
    where 3: fun.flipud(fun.cumsum(fun.flipud(s1)))
    where 4: fun.adlgrk(beta, r, Data)
    where 5: YPmodel.adlgrk(data = data, Estimate = Estimate)
    where 6: YPmodel.default(gastric, repNum = 100)
    where 7: YPmodel(gastric, repNum = 100)
    
     --- value of length: 2 type: logical ---
    [1] FALSE TRUE
     --- function from context ---
    function (data)
    {
     if (class(data) != "matrix") {
     data <- matrix(data, nrow = length(data), ncol = 1)
     }
     size <- dim(data)
     Output <- data
     for (j in 1:size[2]) {
     for (i in 1:size[1]) {
     Output[i, j] <- data[size[1] + 1 - i, j]
     }
     }
     return(Output)
    }
    <bytecode: 0x55c5825b54a8>
    <environment: namespace:YPmodel>
     --- function search by body ---
    Function fun.flipud in namespace YPmodel has this body.
     ----------- END OF FAILURE REPORT --------------
    Error in if (class(data) != "matrix") { : the condition has length > 1
    Calls: YPmodel ... fun.adlgrk -> fun.flipud -> fun.cumsum -> fun.flipud
    Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc

Version: 1.3
Check: examples
Result: ERROR
    Running examples in ‘YPmodel-Ex.R’ failed
    The error most likely occurred in:
    
    > ### Name: YPmodel-package
    > ### Title: The short-term and long-term hazard ratio model for survival
    > ### data
    > ### Aliases: YPmodel-package
    > ### Keywords: Survival analysis
    >
    > ### ** Examples
    >
    > library(YPmodel)
    > data(gastric)
    > YPmodel(gastric, repNum=100)
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
    :
     --- package (from environment) ---
    YPmodel
     --- call from context ---
    fun.flipud(s1)
     --- call from argument ---
    if (class(data) != "matrix") {
     data <- matrix(data, nrow = length(data), ncol = 1)
    }
     --- R stacktrace ---
    where 1: fun.flipud(s1)
    where 2: fun.cumsum(fun.flipud(s1))
    where 3: fun.flipud(fun.cumsum(fun.flipud(s1)))
    where 4: fun.adlgrk(beta, r, Data)
    where 5: YPmodel.adlgrk(data = data, Estimate = Estimate)
    where 6: YPmodel.default(gastric, repNum = 100)
    where 7: YPmodel(gastric, repNum = 100)
    
     --- value of length: 2 type: logical ---
    [1] FALSE TRUE
     --- function from context ---
    function (data)
    {
     if (class(data) != "matrix") {
     data <- matrix(data, nrow = length(data), ncol = 1)
     }
     size <- dim(data)
     Output <- data
     for (j in 1:size[2]) {
     for (i in 1:size[1]) {
     Output[i, j] <- data[size[1] + 1 - i, j]
     }
     }
     return(Output)
    }
    <bytecode: 0x2884328>
    <environment: namespace:YPmodel>
     --- function search by body ---
    Function fun.flipud in namespace YPmodel has this body.
     ----------- END OF FAILURE REPORT --------------
    Error in if (class(data) != "matrix") { : the condition has length > 1
    Calls: YPmodel ... fun.adlgrk -> fun.flipud -> fun.cumsum -> fun.flipud
    Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang

Version: 1.3
Check: examples
Result: ERROR
    Running examples in ‘YPmodel-Ex.R’ failed
    The error most likely occurred in:
    
    > ### Name: YPmodel-package
    > ### Title: The short-term and long-term hazard ratio model for survival
    > ### data
    > ### Aliases: YPmodel-package
    > ### Keywords: Survival analysis
    >
    > ### ** Examples
    >
    > library(YPmodel)
    > data(gastric)
    > YPmodel(gastric, repNum=100)
     ----------- FAILURE REPORT --------------
     --- failure: the condition has length > 1 ---
     --- srcref ---
    :
     --- package (from environment) ---
    YPmodel
     --- call from context ---
    fun.flipud(s1)
     --- call from argument ---
    if (class(data) != "matrix") {
     data <- matrix(data, nrow = length(data), ncol = 1)
    }
     --- R stacktrace ---
    where 1: fun.flipud(s1)
    where 2: fun.cumsum(fun.flipud(s1))
    where 3: fun.flipud(fun.cumsum(fun.flipud(s1)))
    where 4: fun.adlgrk(beta, r, Data)
    where 5: YPmodel.adlgrk(data = data, Estimate = Estimate)
    where 6: YPmodel.default(gastric, repNum = 100)
    where 7: YPmodel(gastric, repNum = 100)
    
     --- value of length: 2 type: logical ---
    [1] FALSE TRUE
     --- function from context ---
    function (data)
    {
     if (class(data) != "matrix") {
     data <- matrix(data, nrow = length(data), ncol = 1)
     }
     size <- dim(data)
     Output <- data
     for (j in 1:size[2]) {
     for (i in 1:size[1]) {
     Output[i, j] <- data[size[1] + 1 - i, j]
     }
     }
     return(Output)
    }
    <bytecode: 0x2b34e30>
    <environment: namespace:YPmodel>
     --- function search by body ---
    Function fun.flipud in namespace YPmodel has this body.
     ----------- END OF FAILURE REPORT --------------
    Error in if (class(data) != "matrix") { : the condition has length > 1
    Calls: YPmodel ... fun.adlgrk -> fun.flipud -> fun.cumsum -> fun.flipud
    Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc