* using log directory ‘/data/gannet/ripley/R/packages/tests-LENGTH1/countytimezones.Rcheck’ * using R Under development (unstable) (2022-04-03 r82074) * using platform: x86_64-pc-linux-gnu (64-bit) * using session charset: UTF-8 * using option ‘--no-stop-on-test-error’ * checking for file ‘countytimezones/DESCRIPTION’ ... OK * checking extension type ... Package * this is package ‘countytimezones’ version ‘1.0.0’ * checking package namespace information ... OK * checking package dependencies ... OK * checking if this is a source package ... OK * checking if there is a namespace ... OK * checking for executable files ... OK * checking for hidden files and directories ... OK * checking for portable file names ... OK * checking for sufficient/correct file permissions ... OK * checking whether package ‘countytimezones’ can be installed ... OK * checking package directory ... OK * checking ‘build’ directory ... OK * checking DESCRIPTION meta-information ... OK * checking top-level files ... OK * checking for left-over files ... OK * checking index information ... OK * checking package subdirectories ... OK * checking R files for non-ASCII characters ... OK * checking R files for syntax errors ... OK * checking whether the package can be loaded ... OK * checking whether the package can be loaded with stated dependencies ... OK * checking whether the package can be unloaded cleanly ... OK * checking whether the namespace can be loaded with stated dependencies ... OK * checking whether the namespace can be unloaded cleanly ... OK * checking loading without being on the library search path ... OK * checking use of S3 registration ... OK * checking dependencies in R code ... OK * checking S3 generic/method consistency ... OK * checking replacement functions ... OK * checking foreign function calls ... OK * checking R code for possible problems ... [9s/13s] OK * checking Rd files ... OK * checking Rd metadata ... OK * checking Rd line widths ... OK * checking Rd cross-references ... OK * checking for missing documentation entries ... OK * checking for code/documentation mismatches ... OK * checking Rd \usage sections ... OK * checking Rd contents ... OK * checking for unstated dependencies in examples ... OK * checking contents of ‘data’ directory ... OK * checking data for non-ASCII characters ... OK * checking LazyData ... OK * checking data for ASCII and uncompressed saves ... OK * checking installed files from ‘inst/doc’ ... OK * checking files in ‘vignettes’ ... OK * checking examples ... OK * checking for unstated dependencies in vignettes ... OK * checking package vignettes in ‘inst/doc’ ... OK * checking re-building of vignette outputs ... [16s/22s] ERROR Error(s) in re-building vignettes: --- re-building ‘countytimezones.Rmd’ using rmarkdown Loading required package: acs Loading required package: stringr Loading required package: XML Attaching package: 'acs' The following object is masked from 'package:base': apply Attaching package: 'dplyr' The following object is masked from 'package:acs': combine The following objects are masked from 'package:stats': filter, lag The following objects are masked from 'package:base': intersect, setdiff, setequal, union ----------- FAILURE REPORT -------------- --- failure: length > 1 in coercion to logical --- --- srcref --- : --- package (from environment) --- choroplethr --- call from context --- a$render() --- call from argument --- private$zoom == "alaska" || private$zoom == "hawaii" --- R stacktrace --- where 1: a$render() where 2: eval(expr, envir, enclos) where 3: eval(expr, envir, enclos) where 4: eval_with_user_handlers(expr, envir, enclos, user_handlers) where 5: withVisible(eval_with_user_handlers(expr, envir, enclos, user_handlers)) where 6: withCallingHandlers(withVisible(eval_with_user_handlers(expr, envir, enclos, user_handlers)), warning = wHandler, error = eHandler, message = mHandler) where 7: handle(ev <- withCallingHandlers(withVisible(eval_with_user_handlers(expr, envir, enclos, user_handlers)), warning = wHandler, error = eHandler, message = mHandler)) where 8: timing_fn(handle(ev <- withCallingHandlers(withVisible(eval_with_user_handlers(expr, envir, enclos, user_handlers)), warning = wHandler, error = eHandler, message = mHandler))) where 9: evaluate_call(expr, parsed$src[[i]], envir = envir, enclos = enclos, debug = debug, last = i == length(out), use_try = stop_on_error != 2L, keep_warning = keep_warning, keep_message = keep_message, output_handler = output_handler, include_timing = include_timing) where 10: evaluate::evaluate(...) where 11: evaluate(code, envir = env, new_device = FALSE, keep_warning = !isFALSE(options$warning), keep_message = !isFALSE(options$message), stop_on_error = if (is.numeric(options$error)) options$error else { if (options$error && options$include) 0L else 2L }, output_handler = knit_handlers(options$render, options)) where 12: in_dir(input_dir(), expr) where 13: in_input_dir(evaluate(code, envir = env, new_device = FALSE, keep_warning = !isFALSE(options$warning), keep_message = !isFALSE(options$message), stop_on_error = if (is.numeric(options$error)) options$error else { if (options$error && options$include) 0L else 2L }, output_handler = knit_handlers(options$render, options))) where 14: eng_r(options) where 15: block_exec(params) where 16: call_block(x) where 17: process_group.block(group) where 18: process_group(group) where 19: withCallingHandlers(if (tangle) process_tangle(group) else process_group(group), error = function(e) { setwd(wd) cat(res, sep = "\n", file = output %n% "") message("Quitting from lines ", paste(current_lines(i), collapse = "-"), " (", knit_concord$get("infile"), ") ") }) where 20: process_file(text, output) where 21: knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet) where 22: rmarkdown::render(file, encoding = encoding, quiet = quiet, envir = globalenv(), output_dir = getwd(), ...) where 23: vweave_rmarkdown(...) where 24: engine$weave(file, quiet = quiet, encoding = enc) where 25: doTryCatch(return(expr), name, parentenv, handler) where 26: tryCatchOne(expr, names, parentenv, handlers[[1L]]) where 27: tryCatchList(expr, classes, parentenv, handlers) where 28: 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) } outputs <- c(outputs, output) }, error = function(e) { thisOK <<- FALSE fails <<- c(fails, file) message(gettextf("Error: processing vignette '%s' failed with diagnostics:\n%s", file, conditionMessage(e))) }) where 29: tools:::buildVignettes(dir = "/data/gannet/ripley/R/packages/tests-LENGTH1/countytimezones.Rcheck/vign_test/countytimezones") --- value of length: 51 type: logical --- [1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE [13] FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE FALSE [25] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE [37] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE [49] FALSE FALSE FALSE --- function from context --- function () { self$prepare_map() if (private$zoom == "alaska" || private$zoom == "hawaii") { choro = self$render_helper(self$choropleth.df, self$scale_name, self$theme_clean()) + ggtitle(self$title) if (self$add_state_outline) { choro + self$render_state_outline(private$zoom) } } else { continental.df = self$choropleth.df[!self$choropleth.df$state %in% c("alaska", "hawaii"), ] continental.ggplot = self$render_helper(continental.df, self$scale_name, self$theme_clean()) + ggtitle(self$title) if (self$add_state_outline) { continental.regions = subset(private$zoom, private$zoom != "alaska" & private$zoom != "hawaii") continental.ggplot = continental.ggplot + self$render_state_outline(continental.regions) } ret = continental.ggplot if (is.null(private$zoom) || "alaska" %in% private$zoom) { alaska.df = self$choropleth.df[self$choropleth.df$state == "alaska", ] alaska.ggplot = self$render_helper(alaska.df, "", self$theme_inset()) if (self$add_state_outline) { alaska.ggplot = alaska.ggplot + self$render_state_outline("alaska") } alaska.grob = ggplotGrob(alaska.ggplot) ret = ret + annotation_custom(grobTree(alaska.grob), xmin = -125, xmax = -110, ymin = 22.5, ymax = 30) } if (is.null(private$zoom) || "hawaii" %in% private$zoom) { hawaii.df = self$choropleth.df[self$choropleth.df$state == "hawaii", ] hawaii.ggplot = self$render_helper(hawaii.df, "", self$theme_inset()) if (self$add_state_outline) { hawaii.ggplot = hawaii.ggplot + self$render_state_outline("hawaii") } hawaii.grob = ggplotGrob(hawaii.ggplot) ret = ret + annotation_custom(grobTree(hawaii.grob), xmin = -107.5, xmax = -102.5, ymin = 25, ymax = 27.5) } ret + ggtitle(self$title) } } --- function search by body --- ----------- END OF FAILURE REPORT -------------- Fatal error: length > 1 in coercion to logical * checking PDF version of manual ... OK * checking for non-standard things in the check directory ... OK * checking for detritus in the temp directory ... OK * DONE Status: 1 ERROR See ‘/data/gannet/ripley/R/packages/tests-LENGTH1/countytimezones.Rcheck/00check.log’ for details. Command exited with non-zero status 1 Time 1:52.78, 69.29 + 8.97