Running ‘test-all.R’ [1s/2s]
Running the tests in ‘tests/test-all.R’ failed.
Complete output:
  > library("testthat")
  > test_check("worrms")
  Loading required package: worrms
  Loading required namespace: jsonlite
  ── 1. Error: wm_children basic usage works (@test-wm_children.R#4)  ────────────
  Please install 'httr'
  1: vcr::use_cassette("wm_children", {
         aa <- wm_children(id = 105706)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_gt(NROW(aa), 1)
         expect_equal(unique(aa$family), "Rhincodontidae")
         expect_equal(unique(aa$order), "Orectolobiformes")
         expect_equal(unique(aa$class), "Elasmobranchii")
         expect_equal(unique(aa$phylum), "Chordata")
         expect_equal(unique(aa$kingdom), "Animalia")
     }) at testthat/test-wm_children.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 2. Error: wm_children - marine_only usage works (@test-wm_children.R#19)  ───
  Please install 'httr'
  1: vcr::use_cassette("wm_children_marine_only_false", {
         expect_is(wm_children(id = 105706, FALSE), "tbl_df")
     }) at testthat/test-wm_children.R:19
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 3. Error: wm_children - offset parameter works (@test-wm_children.R#28)  ────
  Please install 'httr'
  1: vcr::use_cassette("wm_children_offset", {
         off1 <- wm_children(id = 105706, offset = 1)
         off2 <- wm_children(id = 105706, offset = 2)
         expect_equal(off1$AphiaID[1], 297110)
         expect_equal(off2$AphiaID[1], 398065)
     }, record = "all", match_requests_on = c("method", "uri", "query")) at testthat/test-wm_children.R:28
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 4. Error: wm_children_ basic usage works (@test-wm_children.R#51)  ──────────
  Please install 'httr'
  1: vcr::use_cassette("wm_children_", {
         aa <- wm_children_(id = 254966)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_gt(NROW(aa), 1)
         expect_equal(unique(aa$family), "Platanistidae")
     }) at testthat/test-wm_children.R:51
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 5. Error: wm_children_ - 'name' input works (@test-wm_children.R#69)  ───────
  Please install 'httr'
  1: vcr::use_cassette("wm_children_name", {
         aa <- wm_children_(name = c("Platanista", "Leucophaeus"))
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_true(any(grepl("Platanista", aa$scientificname)))
         expect_true(any(grepl("Leucophaeus", aa$scientificname)))
     }, record = "all") at testthat/test-wm_children.R:69
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 6. Error: wm_classification works (@test-wm_classification.R#4)  ────────────
  Please install 'httr'
  1: vcr::use_cassette("wm_classification", {
         aa <- wm_classification(id = 105706)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_named(aa, c("AphiaID", "rank", "scientificname"))
     }) at testthat/test-wm_classification.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 7. Error: wm_classification_ works (@test-wm_classification.R#26)  ──────────
  Please install 'httr'
  1: vcr::use_cassette("wm_classification_", {
         aa <- wm_classification_(id = 105706)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_named(aa, c("id", "AphiaID", "rank", "scientificname"))
     }) at testthat/test-wm_classification.R:26
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 8. Error: wm_common_id basic usage works (@test-wm_common_id.R#4)  ──────────
  Please install 'httr'
  1: vcr::use_cassette("wm_common_id", {
         aa <- wm_common_id(id = 156806)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_named(aa, c("vernacular", "language_code", "language"))
         expect_match(aa$vernacular, "clam")
     }) at testthat/test-wm_common_id.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 9. Error: wm_common_id_ basic usage works (@test-wm_common_id.R#26)  ────────
  Please install 'httr'
  1: vcr::use_cassette("wm_common_id_", {
         aa <- wm_common_id_(id = 156806)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_named(aa, c("id", "vernacular", "language_code", "language"))
         expect_match(aa$vernacular, "clam")
     }) at testthat/test-wm_common_id.R:26
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 10. Error: wm_distribution basic usage works (@test-wm_distribution.R#4)  ───
  Please install 'httr'
  1: vcr::use_cassette("wm_distribution", {
         aa <- wm_distribution(id = 156806)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_gt(NROW(aa), 1)
     }) at testthat/test-wm_distribution.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 11. Error: wm_distribution_ basic usage works (@test-wm_distribution.R#25)  ─
  Please install 'httr'
  1: vcr::use_cassette("wm_distribution_", {
         aa <- wm_distribution_(id = 156806)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_gt(NROW(aa), 1)
     }) at testthat/test-wm_distribution.R:25
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 12. Error: wm_external - default usage works (@test-wm_external.R#4)  ───────
  Please install 'httr'
  1: vcr::use_cassette("wm_external", {
         aa <- wm_external(id = 1080)
         expect_type(aa, "integer")
         expect_equal(aa, 85257)
     }) at testthat/test-wm_external.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 13. Error: wm_external - type: fishbase (@test-wm_external.R#13)  ───────────
  Please install 'httr'
  1: vcr::use_cassette("wm_external_fishbase", {
         aa <- wm_external(id = 278468, type = "fishbase")
         expect_type(aa, "integer")
         expect_equal(aa, 8399)
     }) at testthat/test-wm_external.R:13
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 14. Error: wm_external_ - default usage works (@test-wm_external.R#36)  ─────
  Please install 'httr'
  1: vcr::use_cassette("wm_external_", {
         aa <- wm_external_(id = 1080)
         expect_type(aa, "list")
         expect_type(aa[[1]], "integer")
         expect_equal(aa[[1]], 85257)
     }) at testthat/test-wm_external.R:36
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 15. Error: wm_id2name - default usage works (@test-wm_id2name.R#4)  ─────────
  Please install 'httr'
  1: vcr::use_cassette("wm_id2name", {
         aa <- wm_id2name(id = 1080)
         expect_type(aa, "character")
         expect_equal(aa, "Copepoda")
     }) at testthat/test-wm_id2name.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 16. Error: wm_id2name_ - default usage works (@test-wm_id2name.R#26)  ───────
  Please install 'httr'
  1: vcr::use_cassette("wm_id2name_", {
         aa <- wm_id2name_(id = 1080)
         expect_type(aa, "list")
         expect_type(aa[[1]], "character")
         expect_equal(aa[[1]], "Copepoda")
     }) at testthat/test-wm_id2name.R:26
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 17. Error: wm_name2id - default usage works (@test-wm_name2id.R#4)  ─────────
  Please install 'httr'
  1: vcr::use_cassette("wm_name2id", {
         aa <- wm_name2id(name = "Rhincodon")
         expect_type(aa, "integer")
         expect_equal(aa, 105749)
     }) at testthat/test-wm_name2id.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 18. Error: wm_name2id_ - default usage works (@test-wm_name2id.R#25)  ───────
  Please install 'httr'
  1: vcr::use_cassette("wm_name2id_", {
         aa <- wm_name2id_(name = "Rhincodon")
         expect_type(aa, "list")
         expect_named(aa, "Rhincodon")
     }) at testthat/test-wm_name2id.R:25
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 19. Error: wm_record - default usage works (@test-wm_record.R#4)  ───────────
  Please install 'httr'
  1: vcr::use_cassette("wm_record", {
         aa <- wm_record(id = 105706)
         expect_type(aa, "list")
         expect_equal(aa$valid_name, "Rhincodontidae")
         expect_equal(aa$valid_AphiaID, 105706)
     }) at testthat/test-wm_record.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 20. Error: wm_record_ - default usage works (@test-wm_record.R#27)  ─────────
  Please install 'httr'
  1: vcr::use_cassette("wm_record_", {
         aa <- wm_record_(id = 105706)
         expect_type(aa, "list")
         expect_equal(aa$`105706`$valid_name, "Rhincodontidae")
         expect_equal(aa$`105706`$valid_AphiaID, 105706)
     }) at testthat/test-wm_record.R:27
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 21. Error: wm_record_by_external - default - by id type tsn (@test-wm_record_
  Please install 'httr'
  1: vcr::use_cassette("wm_record_by_external_tsn", {
         tsn <- wm_record_by_external(id = 85257)
         expect_type(tsn, "list")
         expect_equal(tsn$valid_name, "Copepoda")
         expect_equal(tsn$valid_AphiaID, 1080)
     }) at testthat/test-wm_record_by_external.R:5
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 22. Error: wm_record_by_external_ - default - by id type tsn (@test-wm_record
  Please install 'httr'
  1: vcr::use_cassette("wm_record_by_external__tsn", {
         tsn <- wm_record_by_external_(id = 85257)
         expect_type(tsn, "list")
         expect_named(tsn, "85257")
     }) at testthat/test-wm_record_by_external.R:45
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 23. Error: wm_records_common - works (@test-wm_records_common.R#4)  ─────────
  Please install 'httr'
  1: vcr::use_cassette("wm_records_common", {
         aa <- wm_records_common(name = "dolphin")
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_true(any(grepl("AphiaID", names(aa))))
         expect_equal(aa$kingdom, "Animalia")
         expect_equal(aa$genus, "Coryphaena")
     }) at testthat/test-wm_records_common.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 24. Error: wm_records_common - fuzzy parameter works (@test-wm_records_common
  Please install 'httr'
  1: vcr::use_cassette("wm_records_common_fuzzy_false", {
         aa <- wm_records_common(name = "dolphin")
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
     }) at testthat/test-wm_records_common.R:16
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 25. Error: wm_records_common - offset parameter works (@test-wm_records_commo
  Please install 'httr'
  1: vcr::use_cassette("wm_records_common_offset", {
         aa <- wm_records_common(name = "dolphin", fuzzy = TRUE)
         bb <- wm_records_common(name = "dolphin", fuzzy = TRUE, offset = 10)
         expect_false(identical(aa$AphiaID, bb$AphiaID))
     }, record = "new_episodes") at testthat/test-wm_records_common.R:32
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 26. Error: wm_records_common_ - works (@test-wm_records_common.R#55)  ───────
  Please install 'httr'
  1: vcr::use_cassette("wm_records__many", {
         bb <- wm_records_common_(name = c("dolphin", "clam"))
         expect_is(bb, "tbl_df")
         expect_is(bb, "data.frame")
         expect_true("dolphin" %in% bb$id)
         expect_true("clam" %in% bb$id)
     }, record = "new_episodes") at testthat/test-wm_records_common.R:55
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 27. Error: wm_records_date - works (@test-wm_records_date.R#4)  ─────────────
  Please install 'httr'
  1: vcr::use_cassette("wm_records_date", {
         a_date = "2018-04-29T00:00:00+00:00"
         aa <- wm_records_date(a_date)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_true(all(grepl(format(Sys.Date(), "%Y"), aa$modified)))
     }) at testthat/test-wm_records_date.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 28. Error: wm_records_name - works (@test-wm_records_name.R#4)  ─────────────
  Please install 'httr'
  1: vcr::use_cassette("wm_records_name", {
         aa <- wm_records_name(name = "Platanista gangetica")
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_true(all(grepl("Platanista", aa$scientificname)))
         expect_gt(NROW(aa), 1)
     }) at testthat/test-wm_records_name.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 29. Error: wm_records_name - fuzzy parameter (@test-wm_records_name.R#15)  ──
  Please install 'httr'
  1: vcr::use_cassette("wm_records_name_fuzzy", {
         aa <- wm_records_name(name = "Platanista gangetica", fuzzy = FALSE)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_true(all(grepl("Platanista", aa$scientificname)))
         expect_equal(NROW(aa), 1)
     }) at testthat/test-wm_records_name.R:15
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 30. Error: wm_records_names - works (@test-wm_records_names.R#4)  ───────────
  Please install 'httr'
  1: vcr::use_cassette("wm_records_names", {
         aa <- wm_records_names(name = "Platanista gangetica")
         expect_is(aa, "list")
         expect_is(aa[[1]], "tbl_df")
         expect_is(aa[[1]], "data.frame")
         expect_true(all(grepl("Platanista", aa[[1]]$scientificname)))
         expect_equal(NROW(aa[[1]]), 1)
     }) at testthat/test-wm_records_names.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 31. Error: wm_records_names - fuzzy parameter (@test-wm_records_names.R#16)  
  Please install 'httr'
  1: vcr::use_cassette("wm_records_names_fuzzy", {
         aa <- wm_records_names(name = "Platanista gangetica", fuzzy = TRUE)
         expect_is(aa, "list")
         expect_is(aa[[1]], "tbl_df")
         expect_is(aa[[1]], "data.frame")
         expect_true(all(grepl("Platanista", aa[[1]]$scientificname)))
         expect_gt(NROW(aa[[1]]), 1)
     }) at testthat/test-wm_records_names.R:16
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 32. Error: wm_records_taxamatch basic usage works (@test-wm_records_taxamatch
  Please install 'httr'
  1: vcr::use_cassette("wm_records_taxamatch", {
         aa <- wm_records_taxamatch(name = "Platanista gangetica")
         expect_is(aa, "list")
         expect_equal(length(aa), 1)
         expect_is(aa[[1]], "tbl_df")
         expect_is(aa[[1]], "data.frame")
         expect_equal(NROW(aa[[1]]), 1)
     }) at testthat/test-wm_records_taxamatch.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 33. Error: wm_sources - works (@test-wm_sources.R#4)  ───────────────────────
  Please install 'httr'
  1: vcr::use_cassette("wm_sources", {
         aa <- wm_sources(id = 105706)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_true(any(grepl("use", names(aa))))
         expect_true(any(grepl("reference", names(aa))))
         expect_true(any(grepl("page", names(aa))))
         expect_true(any(grepl("url", names(aa))))
     }) at testthat/test-wm_sources.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 34. Error: wm_sources_ - works (@test-wm_sources.R#28)  ─────────────────────
  Please install 'httr'
  1: vcr::use_cassette("wm_sources__many", {
         aa <- wm_sources_(id = c(105706, 126436))
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_true("105706" %in% aa$id)
         expect_true("126436" %in% aa$id)
     }, record = "new_episodes") at testthat/test-wm_sources.R:28
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 35. Error: wm_synonyms - works (@test-wm_synonyms.R#4)  ─────────────────────
  Please install 'httr'
  1: vcr::use_cassette("wm_synonyms", {
         aa <- wm_synonyms(id = 105706)
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_equal(NROW(aa), 1)
         expect_true(any(grepl("scientificname", names(aa))))
         expect_true(any(grepl("AphiaID", names(aa))))
         expect_true(any(grepl("valid_AphiaID", names(aa))))
         expect_true(any(grepl("valid_name", names(aa))))
         expect_true(any(grepl("valid_authority", names(aa))))
     }) at testthat/test-wm_synonyms.R:4
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ── 36. Error: wm_synonyms_ - works (@test-wm_synonyms.R#30)  ───────────────────
  Please install 'httr'
  1: vcr::use_cassette("wm_synonyms__many", {
         aa <- wm_synonyms_(id = c(105706, 126436))
         expect_is(aa, "tbl_df")
         expect_is(aa, "data.frame")
         expect_true("105706" %in% aa$id)
         expect_true("126436" %in% aa$id)
     }, record = "new_episodes") at testthat/test-wm_synonyms.R:30
  2: insert_cassette(name, record = record, match_requests_on = match_requests_on, update_content_length_header = update_content_length_header, 
         allow_playback_repeats = allow_playback_repeats, serialize_with = serialize_with, 
         persist_with = persist_with, preserve_exact_body_bytes = preserve_exact_body_bytes)
  3: webmockr::enable()
  4: vapply(http_lib_adapter_registry$adapters, function(z) {
         z$enable()
     }, logical(1))
  5: FUN(X[[i]], ...)
  6: z$enable()
  7: httr_mock(TRUE)
  8: check_for_pkg("httr")
  9: stop(sprintf("Please install '%s'", x), call. = FALSE)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 0 SKIPPED: 28 FAILED: 36
  1. Error: wm_children basic usage works (@test-wm_children.R#4) 
  2. Error: wm_children - marine_only usage works (@test-wm_children.R#19) 
  3. Error: wm_children - offset parameter works (@test-wm_children.R#28) 
  4. Error: wm_children_ basic usage works (@test-wm_children.R#51) 
  5. Error: wm_children_ - 'name' input works (@test-wm_children.R#69) 
  6. Error: wm_classification works (@test-wm_classification.R#4) 
  7. Error: wm_classification_ works (@test-wm_classification.R#26) 
  8. Error: wm_common_id basic usage works (@test-wm_common_id.R#4) 
  9. Error: wm_common_id_ basic usage works (@test-wm_common_id.R#26) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted