Running ‘testthat.R’ [0m/21m]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(rbcb)
  > 
  > test_check("rbcb")
  ── 1. Error: it should get series json (@test-get_series.R#4)  ─────────────────
  Timeout was reached: Operation timed out after 10000 milliseconds with 0 out of 0 bytes received
  1: get_series(1, start_date = "2017-03-01", end_date = "2017-03-01", as = "text") at testthat/test-get_series.R:4
  2: series_obj(code)
  3: lapply(ser, series_info)
  4: FUN(X[[i]], ...)
  5: httr::GET(url)
  6: request_perform(req, hu$handle$handle)
  7: request_fetch(req$output, req$url, handle)
  8: request_fetch.write_memory(req$output, req$url, handle)
  9: curl::curl_fetch_memory(url, handle = handle)
  
  ── 2. Error: it should get series within a date period specifying only start_dat
  GnuTLS recv error (-110): The TLS connection was non-properly terminated.
  1: get_series(c(USD = 1), start_date = start) at testthat/test-get_series.R:52
  2: series_obj(code)
  3: lapply(ser, series_info)
  4: FUN(X[[i]], ...)
  5: httr::GET(url)
  6: request_perform(req, hu$handle$handle)
  7: request_fetch(req$output, req$url, handle)
  8: request_fetch.write_memory(req$output, req$url, handle)
  9: curl::curl_fetch_memory(url, handle = handle)
  
  ── 3. Error: it should get series within a date period specifying only end_date 
  Recv failure: Connection reset by peer
  1: get_series(c(USD = 1), end_date = end) at testthat/test-get_series.R:59
  2: lapply(objs, function(x) .get_series(series_url(x, start_date, end_date, last)))
  3: FUN(X[[i]], ...)
  4: .get_series(series_url(x, start_date, end_date, last))
  5: http_getter(url)
  6: httr::GET(url = url, config = list(), if (verbose) httr::verbose(), httr::add_headers(`User-Agent` = "Mozilla/5.0 (Macintosh; Intel Mac OS X 10_12_6) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/62.0.3202.89 Safari/537.36"))
  7: request_perform(req, hu$handle$handle)
  8: request_fetch(req$output, req$url, handle)
  9: request_fetch.write_memory(req$output, req$url, handle)
  10: curl::curl_fetch_memory(url, handle = handle)
  
  ── 4. Error: it should get multiple series (@test-get_series.R#66)  ────────────
  GnuTLS recv error (-54): Error in the pull function.
  1: get_series(c(USD = 1, IBOVESPA = 7), start_date = start) at testthat/test-get_series.R:66
  2: series_obj(code)
  3: lapply(ser, series_info)
  4: FUN(X[[i]], ...)
  5: httr::GET(url)
  6: request_perform(req, hu$handle$handle)
  7: request_fetch(req$output, req$url, handle)
  8: request_fetch.write_memory(req$output, req$url, handle)
  9: curl::curl_fetch_memory(url, handle = handle)
  
  ── 5. Error: it should create series objects (@test-series_obj.R#12)  ──────────
  GnuTLS recv error (-110): The TLS connection was non-properly terminated.
  1: series_obj(code) at testthat/test-series_obj.R:12
  2: lapply(ser, series_info)
  3: FUN(X[[i]], ...)
  4: httr::GET(url)
  5: request_perform(req, hu$handle$handle)
  6: request_fetch(req$output, req$url, handle)
  7: request_fetch.write_memory(req$output, req$url, handle)
  8: curl::curl_fetch_memory(url, handle = handle)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 37 SKIPPED: 0 FAILED: 5
  1. Error: it should get series json (@test-get_series.R#4) 
  2. Error: it should get series within a date period specifying only start_date (@test-get_series.R#52) 
  3. Error: it should get series within a date period specifying only end_date (@test-get_series.R#59) 
  4. Error: it should get multiple series (@test-get_series.R#66) 
  5. Error: it should create series objects (@test-series_obj.R#12) 
  
  Error: testthat unit tests failed
  Execution halted