Last updated on 2025-07-22 01:49:20 CEST.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 0.9.0 | 12.67 | 261.11 | 273.78 | OK | |
| r-devel-linux-x86_64-debian-gcc | 0.9.0 | 9.00 | 175.78 | 184.78 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 0.9.0 | 366.18 | ERROR | |||
| r-devel-linux-x86_64-fedora-gcc | 0.9.0 | 369.16 | ERROR | |||
| r-devel-windows-x86_64 | 0.9.0 | 15.00 | 295.00 | 310.00 | OK | |
| r-patched-linux-x86_64 | 0.9.0 | 13.11 | 246.18 | 259.29 | OK | |
| r-release-linux-x86_64 | 0.9.0 | 10.88 | 245.45 | 256.33 | OK | |
| r-release-macos-arm64 | 0.9.0 | 131.00 | OK | |||
| r-release-macos-x86_64 | 0.9.0 | 272.00 | OK | |||
| r-release-windows-x86_64 | 0.9.0 | 14.00 | 300.00 | 314.00 | OK | |
| r-oldrel-macos-arm64 | 0.9.0 | 130.00 | OK | |||
| r-oldrel-macos-x86_64 | 0.9.0 | 256.00 | OK | |||
| r-oldrel-windows-x86_64 | 0.9.0 | 20.00 | 372.00 | 392.00 | OK |
Version: 0.9.0
Check: tests
Result: ERROR
Running ‘testthat.R’ [69s/182s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview
> # * https://testthat.r-lib.org/articles/special-files.html
>
> library(testthat)
> library(ipumsr)
Attaching package: 'ipumsr'
The following object is masked from 'package:testthat':
matches
>
> test_check("ipumsr")
[ FAIL 39 | WARN 0 | SKIP 6 | PASS 673 ]
══ Skipped tests (6) ═══════════════════════════════════════════════════════════
• On CRAN (6): 'test_api_helpers.R:4:3', 'test_api_helpers.R:24:3',
'test_micro_chunked.R:24:3', 'test_read_agg.R:14:3', 'test_read_agg.R:410:3',
'test_shape_read.R:93:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_api_extract_info.R:30:5'): Can check microdata extract status ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:29:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_extract_info.R:30:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:110:5'): Can check NHGIS extract status ─────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:109:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_extract_info.R:110:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:171:5'): We avoid superfluous checks when getting extract status ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:170:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_extract_info.R:171:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:271:5'): Can get extract info for default collection ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:270:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_extract_history("nhgis") at test_api_extract_info.R:271:5
4. └─ipumsr:::ipums_api_paged_request(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:317:5'): Can get extract history for all records ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:316:3
2. │ └─cassette$call_block(...)
3. └─ipumsr:::ipums_api_paged_request(...) at test_api_extract_info.R:317:5
4. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
5. └─ipumsr:::validate_api_request(response)
6. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:355:5'): Can get extract history for more records than page size ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:354:3
2. │ └─cassette$call_block(...)
3. └─ipumsr:::ipums_api_paged_request(...) at test_api_extract_info.R:355:5
4. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
5. └─ipumsr:::validate_api_request(response)
6. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:219:9'): We handle API auth errors for extract and metadata endpoints ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:216:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:217:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. ├─withr::with_envvar(...)
10. │ └─base::force(code)
11. └─ipumsr::get_metadata_catalog("nhgis", "datasets") at test_api_helpers.R:219:9
12. └─ipumsr:::get_summary_metadata(...)
13. └─ipumsr:::ipums_api_paged_request(...)
14. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
15. └─ipumsr:::validate_api_request(response)
16. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:234:5'): Can parse API request error details in basic requests ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:233:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:234:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr:::ipums_api_extracts_request(...)
10. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
11. └─ipumsr:::validate_api_request(response)
12. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:313:5'): Can parse API request error details in paged requests ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:312:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:313:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr:::ipums_api_paged_request(...)
10. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
11. └─ipumsr:::validate_api_request(response)
12. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:333:5'): We inform user about invalid extract number request ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:332:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_last_extract_info("nhgis") at test_api_helpers.R:333:5
4. └─ipumsr::get_extract_history(...)
5. └─ipumsr:::ipums_api_paged_request(...)
6. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
7. └─ipumsr:::validate_api_request(response)
8. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:358:5'): We catch invalid collection specifications during requests ──
Error in `ipums_api_request("GET", url = "https://api.ipums.org/extracts/?collection=foo&version=2",
body = FALSE)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:357:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:358:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr:::ipums_api_request(...)
10. └─ipumsr:::validate_api_request(response)
11. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:373:5'): We warn users about unsupported features detected in an extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:372:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_message(cps_extract <- submit_extract(test_cps_extract())) at test_api_helpers.R:373:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr::submit_extract(test_cps_extract())
10. └─ipumsr:::ipums_api_extracts_request(...)
11. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
12. └─ipumsr:::validate_api_request(response)
13. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:5:5'): We can get summary metadata ──────────────
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:4:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata_catalog("nhgis", "shapefiles") at test_api_metadata.R:5:5
4. └─ipumsr:::get_summary_metadata(...)
5. └─ipumsr:::ipums_api_paged_request(...)
6. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
7. └─ipumsr:::validate_api_request(response)
8. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:39:5'): We can iterate through pages to get all records ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:38:3
2. │ └─cassette$call_block(...)
3. └─ipumsr:::ipums_api_paged_request(...) at test_api_metadata.R:39:5
4. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
5. └─ipumsr:::validate_api_request(response)
6. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:77:5'): We can get metadata for single dataset ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:76:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("nhgis", dataset = ds) at test_api_metadata.R:77:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:108:5'): We can get metadata for single time series table ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:107:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("nhgis", time_series_table = tst) at test_api_metadata.R:108:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:137:5'): We can get metadata for single data table ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:136:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("nhgis", dataset = ds, data_table = dt) at test_api_metadata.R:137:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:156:5'): We can get metadata for a single IHGIS data table w/o dataset ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:155:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("ihgis", data_table = "AL2001pop.ABK") at test_api_metadata.R:156:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:220:5'): get_metadata_nhgis() is deprecated ─────
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:219:3
2. │ └─cassette$call_block(...)
3. ├─lifecycle::expect_deprecated(shp_meta <- get_metadata_nhgis("shapefiles")) at test_api_metadata.R:220:5
4. │ └─testthat::expect_warning(...)
5. │ └─testthat:::expect_condition_matching(...)
6. │ └─testthat:::quasi_capture(...)
7. │ ├─testthat (local) .capture(...)
8. │ │ └─base::withCallingHandlers(...)
9. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
10. └─ipumsr::get_metadata_nhgis("shapefiles")
11. └─ipumsr:::get_summary_metadata(...)
12. └─ipumsr:::ipums_api_paged_request(...)
13. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
14. └─ipumsr:::validate_api_request(response)
15. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:52:5'): Can submit a USA extract ─────────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:51:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(usa_extract)) at test_api_process_extract.R:52:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(usa_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:114:5'): Can submit a household only USA extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:113:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_household_only_usa_extract <- submit_extract(usa_extract)) at test_api_process_extract.R:114:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(usa_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:131:5'): Can submit a CPS extract ────────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:130:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_cps_extract <- submit_extract(cps_extract)) at test_api_process_extract.R:131:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(cps_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:193:5'): Can submit an ATUS extract ──────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:192:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_atus_extract <- submit_extract(atus_extract)) at test_api_process_extract.R:193:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(atus_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:228:5'): Can submit extract with monetary value adjustment ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:227:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted <- submit_extract(x)) at test_api_process_extract.R:228:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(x)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:239:5'): Error on unsupported monetary value adjustment requests ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:238:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_process_extract.R:239:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr::submit_extract(...)
10. └─ipumsr:::ipums_api_extracts_request(...)
11. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
12. └─ipumsr:::validate_api_request(response)
13. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:271:7'): Submission of time-use variable with wrong owner throws error ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_api_process_extract.R:269:3
2. │ └─testthat:::expect_condition_matching(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─vcr::use_cassette(...)
8. │ └─cassette$call_block(...)
9. └─ipumsr::submit_extract(atus_extract) at test_api_process_extract.R:271:7
10. └─ipumsr:::ipums_api_extracts_request(...)
11. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
12. └─ipumsr:::validate_api_request(response)
13. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:283:5'): Can submit an NHGIS extract of multiple types ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:282:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(nhgis_extract)) at test_api_process_extract.R:283:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(nhgis_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:305:5'): Can submit an NHGIS extract of a single type ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:304:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract_shp <- submit_extract(nhgis_extract_shp)) at test_api_process_extract.R:305:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(nhgis_extract_shp)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:333:5'): Can submit an IHGIS extract ─────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:332:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_ihgis_extract <- submit_extract(ihgis_extract)) at test_api_process_extract.R:333:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(ihgis_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:360:5'): Can resubmit an extract ─────────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:359:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_process_extract.R:360:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:396:5'): Revisions update status of submitted extract ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:395:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_extract_history("usa") at test_api_process_extract.R:396:5
4. └─ipumsr:::ipums_api_paged_request(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:429:5'): Can download microdata extract with extract object ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:428:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:429:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:487:5'): Can download NHGIS extract with extract object ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:486:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_process_extract.R:487:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:559:5'): Can download extract with extract id ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:558:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:559:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:620:5'): Can download shapefile-only extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:619:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract_shp <- submit_extract(test_nhgis_extract_shp())) at test_api_process_extract.R:620:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract_shp())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:656:5'): Download extract errors on incomplete extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:655:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_process_extract.R:656:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. ├─base::suppressMessages(download_extract(submit_extract(test_usa_extract())))
10. │ └─base::withCallingHandlers(...)
11. ├─ipumsr::download_extract(submit_extract(test_usa_extract()))
12. │ └─ipumsr:::standardize_extract_identifier(extract)
13. └─ipumsr::submit_extract(test_usa_extract())
14. └─ipumsr:::ipums_api_extracts_request(...)
15. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
16. └─ipumsr:::validate_api_request(response)
17. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:696:5'): Can read downloaded files with ipumsr readers ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:695:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_process_extract.R:696:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:758:5'): Can add to a submitted extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:757:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:758:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:786:5'): We can export to and import from JSON, submitted extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:785:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:786:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
[ FAIL 39 | WARN 0 | SKIP 6 | PASS 673 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.9.0
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
...
--- re-building ‘ipums-api-agg.Rmd’ using rmarkdown
Quitting from ipums-api-agg.Rmd:162-166 [unnamed-chunk-5]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
NULL
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'ipums-api-agg.Rmd' failed with diagnostics:
API request did not return JSON
--- failed re-building ‘ipums-api-agg.Rmd’
--- re-building ‘ipums-api-micro.Rmd’ using rmarkdown
Quitting from ipums-api-micro.Rmd:123-127 [unnamed-chunk-5]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
NULL
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'ipums-api-micro.Rmd' failed with diagnostics:
API request did not return JSON
--- failed re-building ‘ipums-api-micro.Rmd’
--- re-building ‘ipums-api.Rmd’ using rmarkdown
Quitting from ipums-api.Rmd:241-268 [unnamed-chunk-10]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
NULL
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'ipums-api.Rmd' failed with diagnostics:
API request did not return JSON
--- failed re-building ‘ipums-api.Rmd’
--- re-building ‘ipums-bigdata.Rmd’ using rmarkdown
--- finished re-building ‘ipums-bigdata.Rmd’
--- re-building ‘ipums-read.Rmd’ using rmarkdown
Loading required namespace: sf
--- finished re-building ‘ipums-read.Rmd’
--- re-building ‘ipums.Rmd’ using rmarkdown
Loading required namespace: sf
--- finished re-building ‘ipums.Rmd’
--- re-building ‘value-labels.Rmd’ using rmarkdown
--- finished re-building ‘value-labels.Rmd’
SUMMARY: processing the following files failed:
‘ipums-api-agg.Rmd’ ‘ipums-api-micro.Rmd’ ‘ipums-api.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.9.0
Check: tests
Result: ERROR
Running ‘testthat.R’ [121s/180s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview
> # * https://testthat.r-lib.org/articles/special-files.html
>
> library(testthat)
> library(ipumsr)
Attaching package: 'ipumsr'
The following object is masked from 'package:testthat':
matches
>
> test_check("ipumsr")
[ FAIL 39 | WARN 0 | SKIP 6 | PASS 673 ]
══ Skipped tests (6) ═══════════════════════════════════════════════════════════
• On CRAN (6): 'test_api_helpers.R:4:3', 'test_api_helpers.R:24:3',
'test_micro_chunked.R:24:3', 'test_read_agg.R:14:3', 'test_read_agg.R:410:3',
'test_shape_read.R:93:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_api_extract_info.R:30:5'): Can check microdata extract status ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:29:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_extract_info.R:30:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:110:5'): Can check NHGIS extract status ─────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:109:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_extract_info.R:110:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:171:5'): We avoid superfluous checks when getting extract status ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:170:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_extract_info.R:171:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:271:5'): Can get extract info for default collection ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:270:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_extract_history("nhgis") at test_api_extract_info.R:271:5
4. └─ipumsr:::ipums_api_paged_request(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:317:5'): Can get extract history for all records ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:316:3
2. │ └─cassette$call_block(...)
3. └─ipumsr:::ipums_api_paged_request(...) at test_api_extract_info.R:317:5
4. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
5. └─ipumsr:::validate_api_request(response)
6. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:355:5'): Can get extract history for more records than page size ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:354:3
2. │ └─cassette$call_block(...)
3. └─ipumsr:::ipums_api_paged_request(...) at test_api_extract_info.R:355:5
4. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
5. └─ipumsr:::validate_api_request(response)
6. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:219:9'): We handle API auth errors for extract and metadata endpoints ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:216:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:217:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. ├─withr::with_envvar(...)
10. │ └─base::force(code)
11. └─ipumsr::get_metadata_catalog("nhgis", "datasets") at test_api_helpers.R:219:9
12. └─ipumsr:::get_summary_metadata(...)
13. └─ipumsr:::ipums_api_paged_request(...)
14. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
15. └─ipumsr:::validate_api_request(response)
16. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:234:5'): Can parse API request error details in basic requests ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:233:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:234:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr:::ipums_api_extracts_request(...)
10. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
11. └─ipumsr:::validate_api_request(response)
12. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:313:5'): Can parse API request error details in paged requests ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:312:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:313:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr:::ipums_api_paged_request(...)
10. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
11. └─ipumsr:::validate_api_request(response)
12. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:333:5'): We inform user about invalid extract number request ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:332:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_last_extract_info("nhgis") at test_api_helpers.R:333:5
4. └─ipumsr::get_extract_history(...)
5. └─ipumsr:::ipums_api_paged_request(...)
6. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
7. └─ipumsr:::validate_api_request(response)
8. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:358:5'): We catch invalid collection specifications during requests ──
Error in `ipums_api_request("GET", url = "https://api.ipums.org/extracts/?collection=foo&version=2",
body = FALSE)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:357:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:358:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr:::ipums_api_request(...)
10. └─ipumsr:::validate_api_request(response)
11. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:373:5'): We warn users about unsupported features detected in an extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:372:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_message(cps_extract <- submit_extract(test_cps_extract())) at test_api_helpers.R:373:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr::submit_extract(test_cps_extract())
10. └─ipumsr:::ipums_api_extracts_request(...)
11. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
12. └─ipumsr:::validate_api_request(response)
13. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:5:5'): We can get summary metadata ──────────────
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:4:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata_catalog("nhgis", "shapefiles") at test_api_metadata.R:5:5
4. └─ipumsr:::get_summary_metadata(...)
5. └─ipumsr:::ipums_api_paged_request(...)
6. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
7. └─ipumsr:::validate_api_request(response)
8. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:39:5'): We can iterate through pages to get all records ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:38:3
2. │ └─cassette$call_block(...)
3. └─ipumsr:::ipums_api_paged_request(...) at test_api_metadata.R:39:5
4. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
5. └─ipumsr:::validate_api_request(response)
6. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:77:5'): We can get metadata for single dataset ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:76:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("nhgis", dataset = ds) at test_api_metadata.R:77:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:108:5'): We can get metadata for single time series table ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:107:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("nhgis", time_series_table = tst) at test_api_metadata.R:108:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:137:5'): We can get metadata for single data table ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:136:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("nhgis", dataset = ds, data_table = dt) at test_api_metadata.R:137:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:156:5'): We can get metadata for a single IHGIS data table w/o dataset ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:155:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("ihgis", data_table = "AL2001pop.ABK") at test_api_metadata.R:156:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:220:5'): get_metadata_nhgis() is deprecated ─────
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:219:3
2. │ └─cassette$call_block(...)
3. ├─lifecycle::expect_deprecated(shp_meta <- get_metadata_nhgis("shapefiles")) at test_api_metadata.R:220:5
4. │ └─testthat::expect_warning(...)
5. │ └─testthat:::expect_condition_matching(...)
6. │ └─testthat:::quasi_capture(...)
7. │ ├─testthat (local) .capture(...)
8. │ │ └─base::withCallingHandlers(...)
9. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
10. └─ipumsr::get_metadata_nhgis("shapefiles")
11. └─ipumsr:::get_summary_metadata(...)
12. └─ipumsr:::ipums_api_paged_request(...)
13. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
14. └─ipumsr:::validate_api_request(response)
15. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:52:5'): Can submit a USA extract ─────────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:51:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(usa_extract)) at test_api_process_extract.R:52:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(usa_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:114:5'): Can submit a household only USA extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:113:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_household_only_usa_extract <- submit_extract(usa_extract)) at test_api_process_extract.R:114:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(usa_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:131:5'): Can submit a CPS extract ────────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:130:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_cps_extract <- submit_extract(cps_extract)) at test_api_process_extract.R:131:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(cps_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:193:5'): Can submit an ATUS extract ──────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:192:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_atus_extract <- submit_extract(atus_extract)) at test_api_process_extract.R:193:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(atus_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:228:5'): Can submit extract with monetary value adjustment ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:227:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted <- submit_extract(x)) at test_api_process_extract.R:228:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(x)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:239:5'): Error on unsupported monetary value adjustment requests ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:238:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_process_extract.R:239:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr::submit_extract(...)
10. └─ipumsr:::ipums_api_extracts_request(...)
11. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
12. └─ipumsr:::validate_api_request(response)
13. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:271:7'): Submission of time-use variable with wrong owner throws error ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_api_process_extract.R:269:3
2. │ └─testthat:::expect_condition_matching(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─vcr::use_cassette(...)
8. │ └─cassette$call_block(...)
9. └─ipumsr::submit_extract(atus_extract) at test_api_process_extract.R:271:7
10. └─ipumsr:::ipums_api_extracts_request(...)
11. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
12. └─ipumsr:::validate_api_request(response)
13. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:283:5'): Can submit an NHGIS extract of multiple types ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:282:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(nhgis_extract)) at test_api_process_extract.R:283:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(nhgis_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:305:5'): Can submit an NHGIS extract of a single type ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:304:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract_shp <- submit_extract(nhgis_extract_shp)) at test_api_process_extract.R:305:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(nhgis_extract_shp)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:333:5'): Can submit an IHGIS extract ─────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:332:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_ihgis_extract <- submit_extract(ihgis_extract)) at test_api_process_extract.R:333:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(ihgis_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:360:5'): Can resubmit an extract ─────────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:359:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_process_extract.R:360:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:396:5'): Revisions update status of submitted extract ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:395:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_extract_history("usa") at test_api_process_extract.R:396:5
4. └─ipumsr:::ipums_api_paged_request(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:429:5'): Can download microdata extract with extract object ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:428:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:429:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:487:5'): Can download NHGIS extract with extract object ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:486:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_process_extract.R:487:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:559:5'): Can download extract with extract id ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:558:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:559:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:620:5'): Can download shapefile-only extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:619:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract_shp <- submit_extract(test_nhgis_extract_shp())) at test_api_process_extract.R:620:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract_shp())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:656:5'): Download extract errors on incomplete extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:655:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_process_extract.R:656:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. ├─base::suppressMessages(download_extract(submit_extract(test_usa_extract())))
10. │ └─base::withCallingHandlers(...)
11. ├─ipumsr::download_extract(submit_extract(test_usa_extract()))
12. │ └─ipumsr:::standardize_extract_identifier(extract)
13. └─ipumsr::submit_extract(test_usa_extract())
14. └─ipumsr:::ipums_api_extracts_request(...)
15. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
16. └─ipumsr:::validate_api_request(response)
17. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:696:5'): Can read downloaded files with ipumsr readers ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:695:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_process_extract.R:696:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:758:5'): Can add to a submitted extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:757:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:758:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:786:5'): We can export to and import from JSON, submitted extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:785:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:786:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
[ FAIL 39 | WARN 0 | SKIP 6 | PASS 673 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 0.9.0
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
--- re-building ‘ipums-api-agg.Rmd’ using rmarkdown
Quitting from ipums-api-agg.Rmd:162-166 [unnamed-chunk-5]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
NULL
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'ipums-api-agg.Rmd' failed with diagnostics:
API request did not return JSON
--- failed re-building ‘ipums-api-agg.Rmd’
--- re-building ‘ipums-api-micro.Rmd’ using rmarkdown
Quitting from ipums-api-micro.Rmd:123-127 [unnamed-chunk-5]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
NULL
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'ipums-api-micro.Rmd' failed with diagnostics:
API request did not return JSON
--- failed re-building ‘ipums-api-micro.Rmd’
--- re-building ‘ipums-api.Rmd’ using rmarkdown
Quitting from ipums-api.Rmd:241-268 [unnamed-chunk-10]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
NULL
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'ipums-api.Rmd' failed with diagnostics:
API request did not return JSON
--- failed re-building ‘ipums-api.Rmd’
--- re-building ‘ipums-bigdata.Rmd’ using rmarkdown
--- finished re-building ‘ipums-bigdata.Rmd’
--- re-building ‘ipums-read.Rmd’ using rmarkdown
Loading required namespace: sf
--- finished re-building ‘ipums-read.Rmd’
--- re-building ‘ipums.Rmd’ using rmarkdown
Loading required namespace: sf
--- finished re-building ‘ipums.Rmd’
--- re-building ‘value-labels.Rmd’ using rmarkdown
--- finished re-building ‘value-labels.Rmd’
SUMMARY: processing the following files failed:
‘ipums-api-agg.Rmd’ ‘ipums-api-micro.Rmd’ ‘ipums-api.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.9.0
Check: tests
Result: ERROR
Running ‘testthat.R’ [121s/163s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/testing-design.html#sec-tests-files-overview
> # * https://testthat.r-lib.org/articles/special-files.html
>
> library(testthat)
> library(ipumsr)
Attaching package: 'ipumsr'
The following object is masked from 'package:testthat':
matches
>
> test_check("ipumsr")
[ FAIL 39 | WARN 0 | SKIP 6 | PASS 673 ]
══ Skipped tests (6) ═══════════════════════════════════════════════════════════
• On CRAN (6): 'test_api_helpers.R:4:3', 'test_api_helpers.R:24:3',
'test_micro_chunked.R:24:3', 'test_read_agg.R:14:3', 'test_read_agg.R:410:3',
'test_shape_read.R:93:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test_api_extract_info.R:30:5'): Can check microdata extract status ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:29:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_extract_info.R:30:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:110:5'): Can check NHGIS extract status ─────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:109:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_extract_info.R:110:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:171:5'): We avoid superfluous checks when getting extract status ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:170:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_extract_info.R:171:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:271:5'): Can get extract info for default collection ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:270:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_extract_history("nhgis") at test_api_extract_info.R:271:5
4. └─ipumsr:::ipums_api_paged_request(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:317:5'): Can get extract history for all records ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:316:3
2. │ └─cassette$call_block(...)
3. └─ipumsr:::ipums_api_paged_request(...) at test_api_extract_info.R:317:5
4. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
5. └─ipumsr:::validate_api_request(response)
6. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_extract_info.R:355:5'): Can get extract history for more records than page size ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_extract_info.R:354:3
2. │ └─cassette$call_block(...)
3. └─ipumsr:::ipums_api_paged_request(...) at test_api_extract_info.R:355:5
4. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
5. └─ipumsr:::validate_api_request(response)
6. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:219:9'): We handle API auth errors for extract and metadata endpoints ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:216:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:217:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. ├─withr::with_envvar(...)
10. │ └─base::force(code)
11. └─ipumsr::get_metadata_catalog("nhgis", "datasets") at test_api_helpers.R:219:9
12. └─ipumsr:::get_summary_metadata(...)
13. └─ipumsr:::ipums_api_paged_request(...)
14. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
15. └─ipumsr:::validate_api_request(response)
16. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:234:5'): Can parse API request error details in basic requests ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:233:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:234:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr:::ipums_api_extracts_request(...)
10. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
11. └─ipumsr:::validate_api_request(response)
12. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:313:5'): Can parse API request error details in paged requests ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:312:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:313:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr:::ipums_api_paged_request(...)
10. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
11. └─ipumsr:::validate_api_request(response)
12. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:333:5'): We inform user about invalid extract number request ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:332:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_last_extract_info("nhgis") at test_api_helpers.R:333:5
4. └─ipumsr::get_extract_history(...)
5. └─ipumsr:::ipums_api_paged_request(...)
6. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
7. └─ipumsr:::validate_api_request(response)
8. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:358:5'): We catch invalid collection specifications during requests ──
Error in `ipums_api_request("GET", url = "https://api.ipums.org/extracts/?collection=foo&version=2",
body = FALSE)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:357:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_helpers.R:358:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr:::ipums_api_request(...)
10. └─ipumsr:::validate_api_request(response)
11. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_helpers.R:373:5'): We warn users about unsupported features detected in an extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_helpers.R:372:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_message(cps_extract <- submit_extract(test_cps_extract())) at test_api_helpers.R:373:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr::submit_extract(test_cps_extract())
10. └─ipumsr:::ipums_api_extracts_request(...)
11. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
12. └─ipumsr:::validate_api_request(response)
13. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:5:5'): We can get summary metadata ──────────────
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:4:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata_catalog("nhgis", "shapefiles") at test_api_metadata.R:5:5
4. └─ipumsr:::get_summary_metadata(...)
5. └─ipumsr:::ipums_api_paged_request(...)
6. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
7. └─ipumsr:::validate_api_request(response)
8. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:39:5'): We can iterate through pages to get all records ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:38:3
2. │ └─cassette$call_block(...)
3. └─ipumsr:::ipums_api_paged_request(...) at test_api_metadata.R:39:5
4. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
5. └─ipumsr:::validate_api_request(response)
6. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:77:5'): We can get metadata for single dataset ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:76:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("nhgis", dataset = ds) at test_api_metadata.R:77:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:108:5'): We can get metadata for single time series table ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:107:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("nhgis", time_series_table = tst) at test_api_metadata.R:108:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:137:5'): We can get metadata for single data table ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:136:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("nhgis", dataset = ds, data_table = dt) at test_api_metadata.R:137:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:156:5'): We can get metadata for a single IHGIS data table w/o dataset ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:155:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_metadata("ihgis", data_table = "AL2001pop.ABK") at test_api_metadata.R:156:5
4. └─ipumsr:::get_detailed_metadata(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, httr::content_type_json())
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_metadata.R:220:5'): get_metadata_nhgis() is deprecated ─────
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_metadata.R:219:3
2. │ └─cassette$call_block(...)
3. ├─lifecycle::expect_deprecated(shp_meta <- get_metadata_nhgis("shapefiles")) at test_api_metadata.R:220:5
4. │ └─testthat::expect_warning(...)
5. │ └─testthat:::expect_condition_matching(...)
6. │ └─testthat:::quasi_capture(...)
7. │ ├─testthat (local) .capture(...)
8. │ │ └─base::withCallingHandlers(...)
9. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
10. └─ipumsr::get_metadata_nhgis("shapefiles")
11. └─ipumsr:::get_summary_metadata(...)
12. └─ipumsr:::ipums_api_paged_request(...)
13. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
14. └─ipumsr:::validate_api_request(response)
15. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:52:5'): Can submit a USA extract ─────────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:51:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(usa_extract)) at test_api_process_extract.R:52:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(usa_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:114:5'): Can submit a household only USA extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:113:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_household_only_usa_extract <- submit_extract(usa_extract)) at test_api_process_extract.R:114:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(usa_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:131:5'): Can submit a CPS extract ────────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:130:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_cps_extract <- submit_extract(cps_extract)) at test_api_process_extract.R:131:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(cps_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:193:5'): Can submit an ATUS extract ──────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:192:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_atus_extract <- submit_extract(atus_extract)) at test_api_process_extract.R:193:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(atus_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:228:5'): Can submit extract with monetary value adjustment ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:227:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted <- submit_extract(x)) at test_api_process_extract.R:228:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(x)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:239:5'): Error on unsupported monetary value adjustment requests ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:238:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_process_extract.R:239:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─ipumsr::submit_extract(...)
10. └─ipumsr:::ipums_api_extracts_request(...)
11. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
12. └─ipumsr:::validate_api_request(response)
13. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:271:7'): Submission of time-use variable with wrong owner throws error ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─testthat::expect_error(...) at test_api_process_extract.R:269:3
2. │ └─testthat:::expect_condition_matching(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─vcr::use_cassette(...)
8. │ └─cassette$call_block(...)
9. └─ipumsr::submit_extract(atus_extract) at test_api_process_extract.R:271:7
10. └─ipumsr:::ipums_api_extracts_request(...)
11. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
12. └─ipumsr:::validate_api_request(response)
13. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:283:5'): Can submit an NHGIS extract of multiple types ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:282:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(nhgis_extract)) at test_api_process_extract.R:283:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(nhgis_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:305:5'): Can submit an NHGIS extract of a single type ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:304:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract_shp <- submit_extract(nhgis_extract_shp)) at test_api_process_extract.R:305:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(nhgis_extract_shp)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:333:5'): Can submit an IHGIS extract ─────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:332:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_ihgis_extract <- submit_extract(ihgis_extract)) at test_api_process_extract.R:333:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(ihgis_extract)
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:360:5'): Can resubmit an extract ─────────
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:359:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_process_extract.R:360:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:396:5'): Revisions update status of submitted extract ──
Error in `ipums_api_request("GET", url = url, body = FALSE, api_key = api_key,
...)`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:395:3
2. │ └─cassette$call_block(...)
3. └─ipumsr::get_extract_history("usa") at test_api_process_extract.R:396:5
4. └─ipumsr:::ipums_api_paged_request(...)
5. └─ipumsr:::ipums_api_request("GET", url = url, body = FALSE, api_key = api_key, ...)
6. └─ipumsr:::validate_api_request(response)
7. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:429:5'): Can download microdata extract with extract object ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:428:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:429:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:487:5'): Can download NHGIS extract with extract object ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:486:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_process_extract.R:487:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:559:5'): Can download extract with extract id ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:558:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:559:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:620:5'): Can download shapefile-only extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:619:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract_shp <- submit_extract(test_nhgis_extract_shp())) at test_api_process_extract.R:620:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract_shp())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:656:5'): Download extract errors on incomplete extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:655:3
2. │ └─cassette$call_block(...)
3. ├─testthat::expect_error(...) at test_api_process_extract.R:656:5
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. ├─base::suppressMessages(download_extract(submit_extract(test_usa_extract())))
10. │ └─base::withCallingHandlers(...)
11. ├─ipumsr::download_extract(submit_extract(test_usa_extract()))
12. │ └─ipumsr:::standardize_extract_identifier(extract)
13. └─ipumsr::submit_extract(test_usa_extract())
14. └─ipumsr:::ipums_api_extracts_request(...)
15. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
16. └─ipumsr:::validate_api_request(response)
17. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:696:5'): Can read downloaded files with ipumsr readers ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:695:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_nhgis_extract <- submit_extract(test_nhgis_extract())) at test_api_process_extract.R:696:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_nhgis_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:758:5'): Can add to a submitted extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:757:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:758:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
── Error ('test_api_process_extract.R:786:5'): We can export to and import from JSON, submitted extract ──
Error in `ipums_api_request(verb = verb, url = url, body = body, api_key = api_key,
httr::content_type_json())`: API request did not return JSON
Backtrace:
▆
1. ├─vcr::use_cassette(...) at test_api_process_extract.R:785:3
2. │ └─cassette$call_block(...)
3. ├─base::suppressMessages(submitted_usa_extract <- submit_extract(test_usa_extract())) at test_api_process_extract.R:786:5
4. │ └─base::withCallingHandlers(...)
5. └─ipumsr::submit_extract(test_usa_extract())
6. └─ipumsr:::ipums_api_extracts_request(...)
7. └─ipumsr:::ipums_api_request(verb = verb, url = url, body = body, api_key = api_key, httr::content_type_json())
8. └─ipumsr:::validate_api_request(response)
9. └─rlang::abort("API request did not return JSON", call = call)
[ FAIL 39 | WARN 0 | SKIP 6 | PASS 673 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc