CRAN Package Check Results for Package gutenbergr

Last updated on 2019-07-16 00:48:10 CEST.

Flavor Version Tinstall Tcheck Ttotal Status Flags
r-devel-linux-x86_64-debian-clang 0.1.4 6.70 57.08 63.78 OK
r-devel-linux-x86_64-debian-gcc 0.1.4 5.69 45.81 51.50 OK
r-devel-linux-x86_64-fedora-clang 0.1.4 74.59 NOTE
r-devel-linux-x86_64-fedora-gcc 0.1.4 83.86 NOTE
r-devel-windows-ix86+x86_64 0.1.4 20.00 136.00 156.00 ERROR
r-patched-linux-x86_64 0.1.4 6.21 56.33 62.54 OK
r-patched-solaris-x86 0.1.4 122.00 NOTE
r-release-linux-x86_64 0.1.4 6.59 56.48 63.07 OK
r-release-windows-ix86+x86_64 0.1.4 14.00 107.00 121.00 OK
r-release-osx-x86_64 0.1.4 NOTE
r-oldrel-windows-ix86+x86_64 0.1.4 17.00 147.00 164.00 ERROR
r-oldrel-osx-x86_64 0.1.4 NOTE

Check Details

Version: 0.1.4
Check: data for non-ASCII characters
Result: NOTE
     Note: found 13617 marked UTF-8 strings
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-patched-solaris-x86, r-release-osx-x86_64, r-oldrel-osx-x86_64

Version: 0.1.4
Check: tests
Result: ERROR
     Running 'testthat.R' [39s]
    Running the tests in 'tests/testthat.R' failed.
    Complete output:
     > library(testthat)
     > library(gutenbergr)
     >
     > test_check("gutenbergr")
     -- 1. Error: Can download Charles Dickens' Christmas Carol and Jane Austen's Per
     Column `gutenberg_id` must be length 0 (the number of rows) or one, not 2
     1: gutenberg_download(c(46, 105), meta_fields = c("title", "author")) at testthat/test-download.R:19
     2: full_url %>% purrr::map(try_download) %>% purrr::discard(is.null) %>% purrr::map_df(~data_frame(text = .),
     .id = "gutenberg_id") %>% mutate(gutenberg_id = as.integer(gutenberg_id))
     3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
     4: eval(quote(`_fseq`(`_lhs`)), env, env)
     5: eval(quote(`_fseq`(`_lhs`)), env, env)
     6: `_fseq`(`_lhs`)
     7: freduce(value, `_function_list`)
     8: withVisible(function_list[[k]](value))
     9: function_list[[k]](value)
     10: mutate(., gutenberg_id = as.integer(gutenberg_id))
     11: mutate.tbl_df(., gutenberg_id = as.integer(gutenberg_id))
     12: mutate_impl(.data, dots, caller_env())
    
     -- 2. Failure: Can download books from a data frame with gutenberg_id column (@t
     nrow(d) is not strictly more than 10. Difference: -10
    
     -- 3. Failure: We can download a file that only has a -8 version (@test-download
     sum(str_detect(d$text, "Aristotle")) is not strictly more than 50. Difference: -50
    
     -- 4. Error: Trying to download a non-existent book raises a warning (@test-down
     Column `gutenberg_id` must be length 0 (the number of rows) or one, not 2
     1: expect_warning(d <- gutenberg_download(c(5, 1e+06)), "Could not download") at testthat/test-download.R:55
     2: quasi_capture(enquo(object), label, capture_warnings)
     3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...)
     4: withCallingHandlers(code, warning = function(condition) {
     out$push(condition)
     invokeRestart("muffleWarning")
     })
     5: eval_bare(get_expr(.quo), get_env(.quo))
     6: gutenberg_download(c(5, 1e+06))
     7: full_url %>% purrr::map(try_download) %>% purrr::discard(is.null) %>% purrr::map_df(~data_frame(text = .),
     .id = "gutenberg_id") %>% mutate(gutenberg_id = as.integer(gutenberg_id))
     8: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
     9: eval(quote(`_fseq`(`_lhs`)), env, env)
     10: eval(quote(`_fseq`(`_lhs`)), env, env)
     11: `_fseq`(`_lhs`)
     12: freduce(value, `_function_list`)
     13: withVisible(function_list[[k]](value))
     14: function_list[[k]](value)
     15: mutate(., gutenberg_id = as.integer(gutenberg_id))
     16: mutate.tbl_df(., gutenberg_id = as.integer(gutenberg_id))
     17: mutate_impl(.data, dots, caller_env())
    
     == testthat results ===========================================================
     OK: 33 SKIPPED: 1 WARNINGS: 6 FAILED: 4
     1. Error: Can download Charles Dickens' Christmas Carol and Jane Austen's Persuasion (@test-download.R#19)
     2. Failure: Can download books from a data frame with gutenberg_id column (@test-download.R#43)
     3. Failure: We can download a file that only has a -8 version (@test-download.R#50)
     4. Error: Trying to download a non-existent book raises a warning (@test-download.R#55)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-devel-windows-ix86+x86_64

Version: 0.1.4
Check: tests
Result: ERROR
     Running 'testthat.R' [40s]
    Running the tests in 'tests/testthat.R' failed.
    Complete output:
     > library(testthat)
     > library(gutenbergr)
     >
     > test_check("gutenbergr")
     -- 1. Error: Can download Charles Dickens' Christmas Carol and Jane Austen's Per
     Column `gutenberg_id` must be length 0 (the number of rows) or one, not 2
     1: gutenberg_download(c(46, 105), meta_fields = c("title", "author")) at testthat/test-download.R:19
     2: full_url %>% purrr::map(try_download) %>% purrr::discard(is.null) %>% purrr::map_df(~data_frame(text = .),
     .id = "gutenberg_id") %>% mutate(gutenberg_id = as.integer(gutenberg_id))
     3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
     4: eval(quote(`_fseq`(`_lhs`)), env, env)
     5: eval(quote(`_fseq`(`_lhs`)), env, env)
     6: `_fseq`(`_lhs`)
     7: freduce(value, `_function_list`)
     8: withVisible(function_list[[k]](value))
     9: function_list[[k]](value)
     10: mutate(., gutenberg_id = as.integer(gutenberg_id))
     11: mutate.tbl_df(., gutenberg_id = as.integer(gutenberg_id))
     12: mutate_impl(.data, dots, caller_env())
    
     -- 2. Failure: Can download books from a data frame with gutenberg_id column (@t
     nrow(d) is not strictly more than 10. Difference: -10
    
     -- 3. Failure: We can download a file that only has a -8 version (@test-download
     sum(str_detect(d$text, "Aristotle")) is not strictly more than 50. Difference: -50
    
     -- 4. Error: Trying to download a non-existent book raises a warning (@test-down
     Column `gutenberg_id` must be length 0 (the number of rows) or one, not 2
     1: expect_warning(d <- gutenberg_download(c(5, 1e+06)), "Could not download") at testthat/test-download.R:55
     2: quasi_capture(enquo(object), label, capture_warnings)
     3: .capture(act$val <- eval_bare(get_expr(.quo), get_env(.quo)), ...)
     4: withCallingHandlers(code, warning = function(condition) {
     out$push(condition)
     invokeRestart("muffleWarning")
     })
     5: eval_bare(get_expr(.quo), get_env(.quo))
     6: gutenberg_download(c(5, 1e+06))
     7: full_url %>% purrr::map(try_download) %>% purrr::discard(is.null) %>% purrr::map_df(~data_frame(text = .),
     .id = "gutenberg_id") %>% mutate(gutenberg_id = as.integer(gutenberg_id))
     8: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
     9: eval(quote(`_fseq`(`_lhs`)), env, env)
     10: eval(quote(`_fseq`(`_lhs`)), env, env)
     11: `_fseq`(`_lhs`)
     12: freduce(value, `_function_list`)
     13: withVisible(function_list[[k]](value))
     14: function_list[[k]](value)
     15: mutate(., gutenberg_id = as.integer(gutenberg_id))
     16: mutate.tbl_df(., gutenberg_id = as.integer(gutenberg_id))
     17: mutate_impl(.data, dots, caller_env())
    
     == testthat results ===========================================================
     OK: 33 SKIPPED: 1 WARNINGS: 6 FAILED: 4
     1. Error: Can download Charles Dickens' Christmas Carol and Jane Austen's Persuasion (@test-download.R#19)
     2. Failure: Can download books from a data frame with gutenberg_id column (@test-download.R#43)
     3. Failure: We can download a file that only has a -8 version (@test-download.R#50)
     4. Error: Trying to download a non-existent book raises a warning (@test-download.R#55)
    
     Error: testthat unit tests failed
     Execution halted
Flavor: r-oldrel-windows-ix86+x86_64