* using log directory 'd:/Rcompile/CRANpkg/local/3.4/jtools.Rcheck' * using R version 3.4.4 (2018-03-15) * using platform: x86_64-w64-mingw32 (64-bit) * using session charset: ISO8859-1 * checking for file 'jtools/DESCRIPTION' ... OK * checking extension type ... Package * this is package 'jtools' version '2.0.1' * package encoding: UTF-8 * 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 hidden files and directories ... OK * checking for portable file names ... OK * checking whether package 'jtools' can be installed ... OK * checking installed package size ... 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 ... [18s] NOTE md_table: no visible global function definition for 'isFALSE' Undefined global functions or variables: isFALSE * checking Rd files ... OK * checking Rd metadata ... 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 installed files from 'inst/doc' ... OK * checking files in 'vignettes' ... OK * checking examples ... ERROR Running examples in 'jtools-Ex.R' failed The error most likely occurred in: > ### Name: summ.glm > ### Title: Generalized linear regression summaries with options > ### Aliases: summ.glm j_summ.glm > > ### ** Examples > > ## Dobson (1990) Page 93: Randomized Controlled Trial : > counts <- c(18,17,15,20,10,20,25,13,12) > outcome <- gl(3,1,9) > treatment <- gl(3,3) > print(d.AD <- data.frame(treatment, outcome, counts)) treatment outcome counts 1 1 1 18 2 1 2 17 3 1 3 15 4 2 1 20 5 2 2 10 6 2 3 20 7 3 1 25 8 3 2 13 9 3 3 12 > glm.D93 <- glm(counts ~ outcome + treatment, family = poisson) > > # Summarize with standardized coefficients > summ(glm.D93, scale = TRUE) MODEL INFO: Observations: 9 Dependent Variable: counts Type: Generalized linear model Family: poisson Link function: log MODEL FIT: ²(4) = 5.45, p = 0.24 Pseudo-R² (Cragg-Uhler) = 0.46 Pseudo-R² (McFadden) = 0.10 AIC = 56.76, BIC = 57.75 Standard errors: MLE Error in isFALSE(row.names) : could not find function "isFALSE" Calls: -> print.summ.glm -> print -> md_table Execution halted * checking for unstated dependencies in 'tests' ... OK * checking tests ... [49s] ERROR Running 'testthat.R' [49s] Running the tests in 'tests/testthat.R' failed. Complete output: > library(testthat) > library(jtools) > > > test_check("jtools") Failed with error: 'there is no package called 'brms'' Failed with error: 'there is no package called 'rstanarm'' -- 1. Error: jsumm: partial correlations work (@test-jsumm.R#92) -------------- could not find function "isFALSE" 1: expect_output(print(summ(fit, part.corr = TRUE))) at testthat/test-jsumm.R:92 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fit, part.corr = TRUE)) 11: print.summ.lm(summ(fit, part.corr = TRUE)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 2. Error: jsumm: svyglm CIs work (@test-jsumm.R#144) ----------------------- could not find function "isFALSE" 1: expect_output(print(summ(regmodel, confint = TRUE))) at testthat/test-jsumm.R:144 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(regmodel, confint = TRUE)) 11: print.summ.svyglm(summ(regmodel, confint = TRUE)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 3. Error: jsumm: svyglm dropping pvals works (@test-jsumm.R#149) ----------- could not find function "isFALSE" 1: expect_output(print(summ(regmodel, pvals = FALSE))) at testthat/test-jsumm.R:149 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(regmodel, pvals = FALSE)) 11: print.summ.svyglm(summ(regmodel, pvals = FALSE)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 4. Error: jsumm: svyglm odds ratios (@test-jsumm.R#155) -------------------- could not find function "isFALSE" 1: expect_output(print(summ(regmodel, exp = T))) at testthat/test-jsumm.R:155 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(regmodel, exp = T)) 11: print.summ.svyglm(summ(regmodel, exp = T)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 5. Error: jsumm: merMod CIs work (@test-jsumm.R#168) ----------------------- could not find function "isFALSE" 1: expect_output(print(s)) at testthat/test-jsumm.R:168 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(s) 11: print.summ.merMod(s) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 6. Error: jsumm: merMod dropping pvals works (@test-jsumm.R#175) ----------- could not find function "isFALSE" 1: expect_output(print(s)) at testthat/test-jsumm.R:175 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(s) 11: print.summ.merMod(s) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 7. Error: summ: all merMod p-value calculation options work (@test-jsumm.R#18 could not find function "isFALSE" 1: expect_output(print(s)) at testthat/test-jsumm.R:182 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(s) 11: print.summ.merMod(s) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 8. Error: jsumm: lm CIs work (@test-jsumm.R#202) --------------------------- could not find function "isFALSE" 1: expect_output(print(summ(fit, confint = TRUE))) at testthat/test-jsumm.R:202 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fit, confint = TRUE)) 11: print.summ.lm(summ(fit, confint = TRUE)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 9. Error: jsumm: glm CIs work (@test-jsumm.R#207) -------------------------- could not find function "isFALSE" 1: expect_output(print(summ(fitgf, confint = TRUE))) at testthat/test-jsumm.R:207 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fitgf, confint = TRUE)) 11: print.summ.glm(summ(fitgf, confint = TRUE)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 10. Error: jsumm: lm dropping pvals works (@test-jsumm.R#212) -------------- could not find function "isFALSE" 1: expect_output(print(summ(fit, pvals = FALSE))) at testthat/test-jsumm.R:212 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fit, pvals = FALSE)) 11: print.summ.lm(summ(fit, pvals = FALSE)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 11. Error: jsumm: glm dropping pvals works (@test-jsumm.R#217) ------------- could not find function "isFALSE" 1: expect_output(print(summ(fitgf, pvals = FALSE))) at testthat/test-jsumm.R:217 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fitgf, pvals = FALSE)) 11: print.summ.glm(summ(fitgf, pvals = FALSE)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 12. Error: jsumm: lm robust SEs work (@test-jsumm.R#238) ------------------- could not find function "isFALSE" 1: expect_output(print(summ(fit, robust = "HC4m"))) at testthat/test-jsumm.R:238 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fit, robust = "HC4m")) 11: print.summ.lm(summ(fit, robust = "HC4m")) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 13. Error: jsumm: lm partial corrs works (@test-jsumm.R#243) --------------- could not find function "isFALSE" 1: expect_output(print(summ(fit, part.corr = T))) at testthat/test-jsumm.R:243 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fit, part.corr = T)) 11: print.summ.lm(summ(fit, part.corr = T)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 14. Error: jsumm: glm robust SEs work (@test-jsumm.R#252) ------------------ could not find function "isFALSE" 1: expect_output(print(summ(fitgf, robust = "HC4m"))) at testthat/test-jsumm.R:252 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fitgf, robust = "HC4m")) 11: print.summ.glm(summ(fitgf, robust = "HC4m")) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 15. Error: jsumm: lm cluster-robust SEs work (@test-jsumm.R#257) ----------- could not find function "isFALSE" 1: expect_output(print(summ(fit, robust = "HC3", cluster = "Population"))) at testthat/test-jsumm.R:257 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fit, robust = "HC3", cluster = "Population")) 11: print.summ.lm(summ(fit, robust = "HC3", cluster = "Population")) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 16. Error: jsumm: glm cluster-robust SEs work (@test-jsumm.R#263) ---------- could not find function "isFALSE" 1: expect_output(print(summ(fitgf, robust = T, cluster = clusters))) at testthat/test-jsumm.R:263 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fitgf, robust = T, cluster = clusters)) 11: print.summ.glm(summ(fitgf, robust = T, cluster = clusters)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) -- 17. Error: jsumm: Printing isn't borked (@test-jsumm.R#269) ---------------- could not find function "isFALSE" 1: expect_output(print(summ(fitgf, scale = TRUE))) at testthat/test-jsumm.R:269 2: quasi_capture(enquo(object), label, capture_output, width = width) 3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...) 4: capture_output_lines(code, print, width = width) 5: eval_with_output(code, print = print, width = width) 6: withr::with_output_sink(temp, withVisible(code)) 7: force(code) 8: withVisible(code) 9: eval_bare(get_expr(.quo), get_env(.quo)) 10: print(summ(fitgf, scale = TRUE)) 11: print.summ.glm(summ(fitgf, scale = TRUE)) 12: print(md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits)) 13: md_table(ctable, format = getOption("summ.table.format", "multiline"), sig.digits = FALSE, digits = x$digits) == testthat results =========================================================== OK: 296 SKIPPED: 0 WARNINGS: 0 FAILED: 17 1. Error: jsumm: partial correlations work (@test-jsumm.R#92) 2. Error: jsumm: svyglm CIs work (@test-jsumm.R#144) 3. Error: jsumm: svyglm dropping pvals works (@test-jsumm.R#149) 4. Error: jsumm: svyglm odds ratios (@test-jsumm.R#155) 5. Error: jsumm: merMod CIs work (@test-jsumm.R#168) 6. Error: jsumm: merMod dropping pvals works (@test-jsumm.R#175) 7. Error: summ: all merMod p-value calculation options work (@test-jsumm.R#182) 8. Error: jsumm: lm CIs work (@test-jsumm.R#202) 9. Error: jsumm: glm CIs work (@test-jsumm.R#207) 1. ... Error: testthat unit tests failed Execution halted * checking for unstated dependencies in vignettes ... OK * checking package vignettes in 'inst/doc' ... OK * checking re-building of vignette outputs ... [4s] WARNING Error in re-building vignettes: ... Quitting from lines 42-46 (effect_plot.Rmd) Error: processing vignette 'effect_plot.Rmd' failed with diagnostics: could not find function "isFALSE" Execution halted * checking PDF version of manual ... OK * DONE Status: 2 ERRORs, 1 WARNING, 1 NOTE