CRAN Package Check Results for Package tabulizer

Last updated on 2019-07-22 06:47:50 CEST.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 0.2.2 4.98 154.03 159.01 OK
r-devel-linux-x86_64-debian-gcc 0.2.2 3.76 123.66 127.42 OK
r-devel-linux-x86_64-fedora-clang 0.2.2 211.40 OK
r-devel-linux-x86_64-fedora-gcc 0.2.2 113.03 ERROR
r-devel-windows-ix86+x86_64 0.2.2 9.00 132.00 141.00 OK
r-patched-linux-x86_64 0.2.2 4.89 157.55 162.44 OK
r-patched-solaris-x86 0.2.2 162.20 OK
r-release-linux-x86_64 0.2.2 4.67 154.82 159.49 OK
r-release-windows-ix86+x86_64 0.2.2 9.00 106.00 115.00 OK
r-release-osx-x86_64 0.2.2 OK
r-oldrel-windows-ix86+x86_64 0.2.2 10.00 104.00 114.00 ERROR
r-oldrel-osx-x86_64 0.2.2 OK

Check Details

Version: 0.2.2
Check: tests
Result: ERROR
     Running ‘testthat.R’
    Running the tests in ‘tests/testthat.R’ failed.
    Complete output:
     > library("testthat")
     > library("tabulizer")
     >
     > stop_logging()
     > test_check("tabulizer")
     ── 1. Error: (unknown) (@test_extract_tables.R#5) ─────────────────────────────
     no field, method or inner class called 'handled'
     1: test_that("It basically works", {
     tab1 <- extract_tables(sf)
     expect_true(is.list(tab1))
     expect_true(is.matrix(tab1[[1]]))
     }) at testthat/test_extract_tables.R:5
     2: test_code(desc, code, env = parent.frame())
     3: tryCatch(withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) {
     })
     4: tryCatchList(expr, classes, parentenv, handlers)
     5: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh],
     parentenv, handlers[[nh]])
     6: doTryCatch(return(expr), name, parentenv, handler)
     7: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
     8: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     9: value[[3L]](cond)
     10: isTRUE(e$handled)
     11: e$handled
     12: `$.Throwable`(e, "handled")
     13: ._jobjRef_dollar(x[["jobj"]], name)
     14: stop(sprintf("no field, method or inner class called '%s' ", name))
    
     ── 2. Error: (unknown) (@test_extract_text.R#5) ───────────────────────────────
     no field, method or inner class called 'handled'
     1: test_that("Text can be extracted from the whole document", {
     txt <- extract_text(sf, encoding = "UTF-8")
     cite <- paste(format(citation(), style = "citation"), collapse = "")
     striptxt <- gsub("[[:space:]+]", "", txt)
     stripcite <- gsub("[[:space:]+]", "", cite)
     expect_identical(nchar(striptxt), 2L * nchar(stripcite))
     }) at testthat/test_extract_text.R:5
     2: test_code(desc, code, env = parent.frame())
     3: tryCatch(withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) {
     })
     4: tryCatchList(expr, classes, parentenv, handlers)
     5: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh],
     parentenv, handlers[[nh]])
     6: doTryCatch(return(expr), name, parentenv, handler)
     7: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
     8: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     9: value[[3L]](cond)
     10: isTRUE(e$handled)
     11: e$handled
     12: `$.Throwable`(e, "handled")
     13: ._jobjRef_dollar(x[["jobj"]], name)
     14: stop(sprintf("no field, method or inner class called '%s' ", name))
    
     Error in .jcall("java/lang/Class", "Ljava/lang/Class;", "forName", cl, :
     RcallMethod: cannot determine object class
     ── 3. Error: (unknown) (@test_non-latin.R#3) ──────────────────────────────────
     no field, method or inner class called 'handled'
     1: test_that("Read Spanish language PDF", {
     f1 <- "https://github.com/tabulapdf/tabula-java/raw/98957221950af4b90620b51a29e0bbe502eea9ad/src/test/resources/technology/tabula/argentina_diputados_voting_record.pdf"
     expect_true(is.matrix(extract_tables(f1, pages = 1, area = list(c(269.875, 12.75,
     790.5, 561)))[[1]]))
     t1a <- extract_tables(f1, pages = 1, area = list(c(269.875, 12.75, 790.5, 561)),
     output = "data.frame", encoding = "latin1")
     t1b <- extract_tables(f1, pages = 1, area = list(c(269.875, 12.75, 790.5, 561)),
     output = "data.frame", encoding = "UTF-8")
     }) at testthat/test_non-latin.R:3
     2: test_code(desc, code, env = parent.frame())
     3: tryCatch(withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) {
     })
     4: tryCatchList(expr, classes, parentenv, handlers)
     5: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh],
     parentenv, handlers[[nh]])
     6: doTryCatch(return(expr), name, parentenv, handler)
     7: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
     8: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     9: value[[3L]](cond)
     10: isTRUE(e$handled)
     11: e$handled
     12: `$.Throwable`(e, "handled")
     13: ._jobjRef_dollar(x[["jobj"]], name)
     14: stop(sprintf("no field, method or inner class called '%s' ", name))
    
     ── 4. Error: (unknown) (@test_split_merge.R#5) ────────────────────────────────
     no field, method or inner class called 'handled'
     1: test_that("Splitting works", {
     s <- split_pdf(sf)
     npages1 <- get_n_pages(s[1])
     npages2 <- get_n_pages(s[1])
     npages3 <- get_n_pages(s[1])
     expect_true(is.character(s))
     expect_identical(length(s), 3L)
     expect_identical(npages1, 1L)
     expect_identical(npages2, 1L)
     expect_identical(npages3, 1L)
     expect_true(all(file.exists(s)))
     unlink(s)
     }) at testthat/test_split_merge.R:5
     2: test_code(desc, code, env = parent.frame())
     3: tryCatch(withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) {
     })
     4: tryCatchList(expr, classes, parentenv, handlers)
     5: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh],
     parentenv, handlers[[nh]])
     6: doTryCatch(return(expr), name, parentenv, handler)
     7: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
     8: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     9: value[[3L]](cond)
     10: isTRUE(e$handled)
     11: e$handled
     12: `$.Throwable`(e, "handled")
     13: ._jobjRef_dollar(x[["jobj"]], name)
     14: stop(sprintf("no field, method or inner class called '%s' ", name))
    
     ── 5. Error: (unknown) (@test_utils.R#13) ─────────────────────────────────────
     no field, method or inner class called 'handled'
     1: test_that("Page length", {
     np <- get_n_pages(file = pdffile)
     expect_true(np == 3)
     }) at testthat/test_utils.R:13
     2: test_code(desc, code, env = parent.frame())
     3: tryCatch(withCallingHandlers({
     eval(code, test_env)
     if (!handled && !is.null(test)) {
     skip_empty()
     }
     }, expectation = handle_expectation, skip = handle_skip, warning = handle_warning,
     message = handle_message, error = handle_error), error = handle_fatal, skip = function(e) {
     })
     4: tryCatchList(expr, classes, parentenv, handlers)
     5: tryCatchOne(tryCatchList(expr, names[-nh], parentenv, handlers[-nh]), names[nh],
     parentenv, handlers[[nh]])
     6: doTryCatch(return(expr), name, parentenv, handler)
     7: tryCatchList(expr, names[-nh], parentenv, handlers[-nh])
     8: tryCatchOne(expr, names, parentenv, handlers[[1L]])
     9: value[[3L]](cond)
     10: isTRUE(e$handled)
     11: e$handled
     12: `$.Throwable`(e, "handled")
     13: ._jobjRef_dollar(x[["jobj"]], name)
     14: stop(sprintf("no field, method or inner class called '%s' ", name))
    
     Error in ._jobjRef_dollar(x[["jobj"]], name) :
     no field, method or inner class called 'handled'
     Calls: test_check ... <Anonymous> -> isTRUE -> $ -> $.Throwable -> ._jobjRef_dollar
     Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc

Version: 0.2.2
Check: tests
Result: ERROR
     Running 'testthat.R' [40s]
    Running the tests in 'tests/testthat.R' failed.
    Complete output:
     > library("testthat")
     > library("tabulizer")
     >
     > stop_logging()
     > test_check("tabulizer")
     -- 1. Error: Read French language PDF w/correct encoding (@test_non-latin.R#15)
     cannot open URL 'http://www.europarl.europa.eu/oeil/popups/printfichetechnical.pdf?id=673511&lang=fr'
     1: extract_text(f2, page = 1, encoding = "latin1") at testthat/test_non-latin.R:15
     2: load_doc(file, password = password, copy = copy)
     3: localize_file(path = file, copy = copy)
     4: utils::download.file(path, tmp, quiet = quiet, mode = "wb")
    
     == testthat results ===========================================================
     OK: 89 SKIPPED: 0 WARNINGS: 1 FAILED: 1
     1. Error: Read French language PDF w/correct encoding (@test_non-latin.R#15)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-oldrel-windows-ix86+x86_64