Running 'testthat.R' [7s/29s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(checkmate)
  > library(coalitions)
  > 
  > test_check("coalitions")
  -- 1. Error: State wide german scrapers work (@test-scrapers.R#16)  ------------
  Timeout was reached: [www.wahlrecht.de] Failed to connect to www.wahlrecht.de port 443: Connection timed out
  Backtrace:
    1. checkmate::expect_data_frame(...)
    6. coalitions::scrape_wahlrecht(hp.vec[1])
   10. coalitions:::try_readHTML(address)
   11. base::tryCatch(...)
   12. base:::tryCatchList(expr, classes, parentenv, handlers)
   13. base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
   14. value[[3L]](cond)
  
  -- 2. Error: Federal german scrapers work  -------------------------------------
  Timeout was reached: [www.wahlrecht.de] Failed to connect to www.wahlrecht.de port 443: Connection timed out
  Backtrace:
   1. coalitions::scrape_by()
   5. coalitions:::try_readHTML(address)
   6. base::tryCatch(...)
   7. base:::tryCatchList(expr, classes, parentenv, handlers)
   8. base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
   9. value[[3L]](cond)
  
  -- 3. Error: Collapse parties works correctly (@test-scrapers.R#80)  -----------
  Timeout was reached: [www.wahlrecht.de] Failed to connect to www.wahlrecht.de port 443: Connection timed out
  Backtrace:
   1. coalitions::scrape_wahlrecht("https://www.wahlrecht.de/umfragen/gms.htm")
   5. coalitions:::try_readHTML(address)
   6. base::tryCatch(...)
   7. base:::tryCatchList(expr, classes, parentenv, handlers)
   8. base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
   9. value[[3L]](cond)
  
  -- 4. Error: workflow stable  --------------------------------------------------
  Timeout was reached: [www.wahlrecht.de] Failed to connect to www.wahlrecht.de port 443: Connection timed out
  Backtrace:
   1. coalitions::scrape_wahlrecht()
   5. coalitions:::try_readHTML(address)
   6. base::tryCatch(...)
   7. base:::tryCatchList(expr, classes, parentenv, handlers)
   8. base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
   9. value[[3L]](cond)
  
  == testthat results  ===========================================================
  [ OK: 52 | SKIPPED: 0 | WARNINGS: 0 | FAILED: 4 ]
  1. Error: State wide german scrapers work (@test-scrapers.R#16) 
  2. Error: Federal german scrapers work 
  3. Error: Collapse parties works correctly (@test-scrapers.R#80) 
  4. Error: workflow stable 
  
  Error: testthat unit tests failed
  In addition: Warning messages:
  1: In for (i in seq_along(sigs)) { :
    closing unused connection 4 (https://www.wahlrecht.de/umfragen/allensbach.htm)
  2: closing unused connection 5 (https://www.wahlrecht.de/umfragen/gms.htm) 
  3: closing unused connection 4 (https://www.wahlrecht.de/umfragen/landtage/bayern.htm) 
  Execution halted