Running ‘testthat.R’ [14s/264s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(pmparser)
  > 
  > test_check('pmparser')
  trying URL 'ftp://ftp.ncbi.nlm.nih.gov/pubmed//baseline/pubmed22n1113.xml.gz.md5'
  Content type 'unknown' length 60 bytes
  ==================================================
  trying URL 'ftp://ftp.ncbi.nlm.nih.gov/pubmed//updatefiles/pubmed22n1116.xml.gz.md5'
  Content type 'unknown' length 60 bytes
  ==================================================
  trying URL 'ftp://ftp.ncbi.nlm.nih.gov/pubmed/baseline/pubmed22n1113.xml.gz'
  Content type 'unknown' length 58838471 bytes (56.1 MB)
  ==================================================
  trying URL 'ftp://ftp.ncbi.nlm.nih.gov/pubmed/updatefiles/pubmed22n1116.xml.gz'
  Content type 'unknown' length 88307123 bytes (84.2 MB)
  ===========
  trying URL 'ftp://ftp.ncbi.nlm.nih.gov/pubmed/updatefiles/pubmed22n1116.xml.gz'
  Content type 'unknown' length 88307123 bytes (84.2 MB)
  ============
  trying URL 'ftp://ftp.ncbi.nlm.nih.gov/pubmed/updatefiles/pubmed22n1116.xml.gz'
  Content type 'unknown' length 88307123 bytes (84.2 MB)
  ===================
  [ FAIL 1 | WARN 6 | SKIP 0 | PASS 185 ]
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test_get_pubmed_files.R:30:3): getPubmedFiles ────────────────────────
  Error in `{
      remoteDir
      download(glue("{remoteDir}{f$sub_dir}/{f[[col]]}"), file.path(localDir, 
          f$sub_dir, f[[col]]))
  }`: task 2 failed - "cannot open URL 'ftp://ftp.ncbi.nlm.nih.gov/pubmed/updatefiles/pubmed22n1116.xml.gz'"
  Backtrace:
      ▆
   1. └─pmparser:::getPubmedFiles(dFilePre, localDir, downloadMd5 = FALSE) at test_get_pubmed_files.R:30:2
   2.   └─... %dopar% ...
   3.     └─e$fun(obj, substitute(ex), parent.frame(), e$data)
  
  [ FAIL 1 | WARN 6 | SKIP 0 | PASS 185 ]
  Error: Test failures
  In addition: Warning message:
  call dbDisconnect() when finished working with a connection 
  Execution halted