Running 'testthat.R' [53s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(fingertipscharts)
  > test_check("fingertipscharts")
  -- 1. Error: (unknown) (@test-examples.R#33)  ----------------------------------
  parse error: premature EOF
                                         
                       (right here) ------^
  1: fingertips_data(90366) %>% filter(Sex == "Male") at testthat/test-examples.R:33
  2: eval(lhs, parent, parent)
  3: eval(lhs, parent, parent)
  4: fingertips_data(90366)
  5: area_types(path = path)
  6: paste0(path, "area_types/parent_area_types") %>% get_fingertips_api()
  7: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  8: eval(quote(`_fseq`(`_lhs`)), env, env)
  9: eval(quote(`_fseq`(`_lhs`)), env, env)
  10: `_fseq`(`_lhs`)
  ...
  17: eval(quote(`_fseq`(`_lhs`)), env, env)
  18: eval(quote(`_fseq`(`_lhs`)), env, env)
  19: `_fseq`(`_lhs`)
  20: freduce(value, `_function_list`)
  21: withVisible(function_list[[k]](value))
  22: function_list[[k]](value)
  23: fromJSON(., flatten = TRUE)
  24: parse_and_simplify(txt = txt, simplifyVector = simplifyVector, simplifyDataFrame = simplifyDataFrame, 
         simplifyMatrix = simplifyMatrix, flatten = flatten, ...)
  25: parseJSON(txt, bigint_as_char)
  26: parse_string(txt, bigint_as_char)
  
  -- 2. Error: (unknown) (@test-map.R#5)  ----------------------------------------
  Timeout was reached: Operation timed out after 10000 milliseconds with 0 out of 0 bytes received
  1: fingertips_data(90366) %>% filter(Sex == "Male" & AreaType == "County & UA" & Timeperiod == 
         "2014 - 16") at testthat/test-map.R:5
  2: eval(lhs, parent, parent)
  3: eval(lhs, parent, parent)
  4: fingertips_data(90366)
  5: area_types(path = path)
  6: paste0(path, "area_types/parent_area_types") %>% get_fingertips_api()
  7: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  8: eval(quote(`_fseq`(`_lhs`)), env, env)
  9: eval(quote(`_fseq`(`_lhs`)), env, env)
  10: `_fseq`(`_lhs`)
  ...
  17: eval(quote(`_fseq`(`_lhs`)), env, env)
  18: eval(quote(`_fseq`(`_lhs`)), env, env)
  19: `_fseq`(`_lhs`)
  20: freduce(value, `_function_list`)
  21: function_list[[i]](value)
  22: GET(., use_proxy(ie_get_proxy_for_url(.), username = "", password = "", auth = "ntlm"))
  23: request_perform(req, hu$handle$handle)
  24: request_fetch(req$output, req$url, handle)
  25: request_fetch.write_memory(req$output, req$url, handle)
  26: curl::curl_fetch_memory(url, handle = handle)
  
  == testthat results  ===========================================================
  OK: 13 SKIPPED: 22 FAILED: 2
  1. Error: (unknown) (@test-examples.R#33) 
  2. Error: (unknown) (@test-map.R#5) 
  
  Error: testthat unit tests failed
  Execution halted