Running 'testthat.R' [175s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(rPDBapi)
  > 
  > test_check("rPDBapi")
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 65 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test_get_fasta_from_rcsb_entry.R:5:3'): get_fasta_from_rcsb_entry returns correct FASTA sequences ──
  Error in `value[[3L]](cond)`: Failed to retrieve data from the RCSB PDB. Network error: Timeout was reached [www.rcsb.org]:
  Connection timed out after 10012 milliseconds
  Backtrace:
      ▆
   1. └─rPDBapi::get_fasta_from_rcsb_entry("4HHB") at test_get_fasta_from_rcsb_entry.R:5:3
   2.   └─base::tryCatch(...)
   3.     └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4.       └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5.         └─value[[3L]](cond)
  ── Error ('test_get_fasta_from_rcsb_entry.R:13:3'): get_fasta_from_rcsb_entry returns correct chain sequence ──
  Error in `value[[3L]](cond)`: Failed to retrieve data from the RCSB PDB. Network error: Timeout was reached [www.rcsb.org]:
  Connection timed out after 10014 milliseconds
  Backtrace:
      ▆
   1. └─rPDBapi::get_fasta_from_rcsb_entry("4HHB", chain_id = "A") at test_get_fasta_from_rcsb_entry.R:13:3
   2.   └─base::tryCatch(...)
   3.     └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4.       └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5.         └─value[[3L]](cond)
  ── Error ('test_get_pdb_file.R:3:3'): get_pdb_file downloads and parses the PDB file correctly ──
  Error in `value[[3L]](cond)`: API Error: Failed to retrieve data for PDB ID '4HHB'. Error: HTTP Error: Request to https://files.rcsb.org/download/4HHB.pdb.gz failed with status:  - Server error: (503) Service Unavailable
  Backtrace:
      ▆
   1. └─rPDBapi::get_pdb_file("4HHB", filetype = "pdb", save = FALSE) at test_get_pdb_file.R:3:3
   2.   └─base::tryCatch(...)
   3.     └─base (local) tryCatchList(expr, classes, parentenv, handlers)
   4.       └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
   5.         └─value[[3L]](cond)
  
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 65 ]
  Error: Test failures
  Execution halted