Error(s) in re-building vignettes:
  ...
--- re-building ‘divo-Manual.Rnw’ using Sweave
--- finished re-building ‘divo-Manual.Rnw’

--- re-building ‘divo-Vignette.Rnw’ using Sweave
Loading required package: cluster
 ----------- FAILURE REPORT -------------- 
 --- failure: the condition has length > 1 ---
 --- srcref --- 
: 
 --- package (from environment) --- 
divo
 --- call from context --- 
i.inp(x, resample = 100)
 --- call from argument --- 
if (class(xx) == "numeric") {
    stop("Number of columns must be greater than 1")
}
 --- R stacktrace ---
where 1: i.inp(x, resample = 100)
where 2: eval(expr, .GlobalEnv)
where 3: eval(expr, .GlobalEnv)
where 4: withVisible(eval(expr, .GlobalEnv))
where 5: doTryCatch(return(expr), name, parentenv, handler)
where 6: tryCatchOne(expr, names, parentenv, handlers[[1L]])
where 7: tryCatchList(expr, classes, parentenv, handlers)
where 8: tryCatch(expr, error = function(e) {
    call <- conditionCall(e)
    if (!is.null(call)) {
        if (identical(call[[1L]], quote(doTryCatch))) 
            call <- sys.call(-4L)
        dcall <- deparse(call)[1L]
        prefix <- paste("Error in", dcall, ": ")
        LONG <- 75L
        sm <- strsplit(conditionMessage(e), "\n")[[1L]]
        w <- 14L + nchar(dcall, type = "w") + nchar(sm[1L], type = "w")
        if (is.na(w)) 
            w <- 14L + nchar(dcall, type = "b") + nchar(sm[1L], 
                type = "b")
        if (w > LONG) 
            prefix <- paste0(prefix, "\n  ")
    }
    else prefix <- "Error : "
    msg <- paste0(prefix, conditionMessage(e), "\n")
    .Internal(seterrmessage(msg[1L]))
    if (!silent && isTRUE(getOption("show.error.messages"))) {
        cat(msg, file = outFile)
        .Internal(printDeferredWarnings())
    }
    invisible(structure(msg, class = "try-error", condition = e))
})
where 9: try(withVisible(eval(expr, .GlobalEnv)), silent = TRUE)
where 10: evalFunc(ce, options)
where 11: tryCatchList(expr, classes, parentenv, handlers)
where 12: tryCatch(evalFunc(ce, options), finally = {
    cat("\n")
    sink()
})
where 13: driver$runcode(drobj, chunk, chunkopts)
where 14: utils::Sweave(...)
where 15: engine$weave(file, quiet = quiet, encoding = enc)
where 16: doTryCatch(return(expr), name, parentenv, handler)
where 17: tryCatchOne(expr, names, parentenv, handlers[[1L]])
where 18: tryCatchList(expr, classes, parentenv, handlers)
where 19: tryCatch({
    engine$weave(file, quiet = quiet, encoding = enc)
    setwd(startdir)
    output <- find_vignette_product(name, by = "weave", engine = engine)
    if (!have.makefile && vignette_is_tex(output)) {
        texi2pdf(file = output, clean = FALSE, quiet = quiet)
        output <- find_vignette_product(name, by = "texi2pdf", 
            engine = engine)
    }
}, error = function(e) {
    OK <<- FALSE
    message(gettextf("Error: processing vignette '%s' failed with diagnostics:\n%s", 
        file, conditionMessage(e)))
})
where 20: tools:::.buildOneVignette("divo-Vignette.Rnw", "/home/hornik/tmp/R.check/r-devel-gcc/Work/PKGS/divo.Rcheck/vign_test/divo", 
    TRUE, FALSE, "divo-Vignette", "", "/home/hornik/tmp/scratch/Rtmp3zJblL/file731d67538a49.rds")

 --- value of length: 2 type: logical ---
[1] FALSE FALSE
 --- function from context --- 
function (x, alpha = 1, CI = 0.95, resample = 100, graph = FALSE, 
    csv_output = FALSE, PlugIn = FALSE, size = 1, CVG = FALSE, 
    saveBootstrap = FALSE) 
{
    xx = x
    resample = round(resample, 0)
    xx[is.na(xx)] <- 0
    if (class(xx) == "numeric") {
        stop("Number of columns must be greater than 1")
    }
    if (resample < 1) {
        stop("resample must be greater than 1")
    }
    if (size < 0.1) {
        stop("size must be greater than or equal to 0.1")
    }
    if (alpha > 0) {
        if (class(xx) != "matrix") {
            xx <- as.matrix(xx)
        }
        if (0 < CI & CI < 1) {
            dimX = dim(xx)
            OutMean = mat.or.vec(dimX[2], dimX[2])
            OutMin = mat.or.vec(dimX[2], dimX[2])
            OutMax = mat.or.vec(dimX[2], dimX[2])
            OutCvg = mat.or.vec(dimX[2], 1)
            .Call("read", "OL", 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 
                0, 0, 0, 0, 0, xx, "INP", alpha, resample, CI, 
                0, PlugIn, size, 0, CVG, saveBootstrap, OutMean, 
                OutMin, OutMax, OutCvg)
            return(.e.clust(xx, csv_output, graph, funct = "INP", 
                CVG, PlugIn, OutMean, OutMin, OutMax, OutCvg, 
                saveBootstrap))
        }
        else {
            stop("Confidence interval must be between 0 and 1; default CI=0.95")
        }
    }
    else {
        stop("alpha must be greater than 0")
    }
}
<bytecode: 0x55a356c6e080>
<environment: namespace:divo>
 --- function search by body ---
Function i.inp in namespace divo has this body.
 ----------- END OF FAILURE REPORT -------------- 
Fatal error: the condition has length > 1
SUMMARY: processing the following file failed:
  ‘divo-Vignette.Rnw’

Error: Vignette re-building failed.
Execution halted