Running ‘testthat.R’ [1s/2s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > # Run all unit tests
  > 
  > # This is a wrapper around all the tests specified
  > # in the tests/testthat directory. These tests are visible
  > # to users and serve as small examples as well.
  > testthat::test_check("MODISTools")
  Loading required package: MODISTools
  Error in open.connection(con, "rb") : 
    Failed to connect to modis.ornl.gov port 443: Connection refused
  ── 1. Error: test coordinate transforms (@test_coordinate_conversions.R#6)  ────
  $ operator is invalid for atomic vectors
  1: mt_subset(product = "MOD11A2", lat = 40, lon = -110, band = "LST_Day_1km", start = "2004-01-01", 
         end = "2004-03-31", progress = FALSE) at testthat/test_coordinate_conversions.R:6
  2: MODISTools::mt_products()
  3: withVisible(`_f`())
  4: `_f`()
  
  Error in open.connection(con, "rb") : 
    Failed to connect to modis.ornl.gov port 443: Connection refused
  ── 2. Error: test mt_products() (@test_download_functions.R#6)  ────────────────
  $ operator is invalid for atomic vectors
  1: expect_is(mt_products(), "data.frame") at testthat/test_download_functions.R:6
  2: quasi_label(enquo(object), label, arg = "object")
  3: eval_bare(get_expr(quo), get_env(quo))
  4: mt_products()
  5: withVisible(`_f`())
  6: `_f`()
  
  Error in open.connection(con, "rb") : 
    Failed to connect to modis.ornl.gov port 443: Connection refused
  ── 3. Error: test mt_sites() (@test_download_functions.R#10)  ──────────────────
  Your requested timed out or the server is unreachable
  1: expect_is(mt_sites(), "data.frame") at testthat/test_download_functions.R:10
  2: quasi_label(enquo(object), label, arg = "object")
  3: eval_bare(get_expr(quo), get_env(quo))
  4: mt_sites()
  5: withVisible(`_f`())
  6: `_f`()
  7: stop("Your requested timed out or the server is unreachable")
  
  Error in open.connection(con, "rb") : 
    Failed to connect to modis.ornl.gov port 443: Connection refused
  ── 4. Error: test mt_bands() (@test_download_functions.R#14)  ──────────────────
  $ operator is invalid for atomic vectors
  1: expect_is(mt_bands(product = "MOD11A2"), "data.frame") at testthat/test_download_functions.R:14
  2: quasi_label(enquo(object), label, arg = "object")
  3: eval_bare(get_expr(quo), get_env(quo))
  4: mt_bands(product = "MOD11A2")
  5: withVisible(`_f`(product = product))
  6: `_f`(product = product)
  7: MODISTools::mt_products()
  8: withVisible(`_f`())
  9: `_f`()
  
  Error in open.connection(con, "rb") : 
    Failed to connect to modis.ornl.gov port 443: Connection refused
  ── 5. Error: test mt_dates() (@test_download_functions.R#22)  ──────────────────
  $ operator is invalid for atomic vectors
  1: expect_is(mt_dates(product = "MOD11A2", lat = 40, lon = -110), "data.frame") at testthat/test_download_functions.R:22
  2: quasi_label(enquo(object), label, arg = "object")
  3: eval_bare(get_expr(quo), get_env(quo))
  4: mt_dates(product = "MOD11A2", lat = 40, lon = -110)
  5: MODISTools::mt_products()
  6: withVisible(`_f`())
  7: `_f`()
  
  Error in open.connection(con, "rb") : 
    Failed to connect to modis.ornl.gov port 443: Connection refused
  ── 6. Error: test mt_subset() (@test_download_functions.R#67)  ─────────────────
  $ operator is invalid for atomic vectors
  1: expect_is(mt_subset(product = "MOD11A2", lat = 40, lon = -110, band = "LST_Day_1km", 
         start = "2004-01-01", end = "2004-03-31", progress = FALSE), "data.frame") at testthat/test_download_functions.R:67
  2: quasi_label(enquo(object), label, arg = "object")
  3: eval_bare(get_expr(quo), get_env(quo))
  4: mt_subset(product = "MOD11A2", lat = 40, lon = -110, band = "LST_Day_1km", start = "2004-01-01", 
         end = "2004-03-31", progress = FALSE)
  5: MODISTools::mt_products()
  6: withVisible(`_f`())
  7: `_f`()
  
  Error in open.connection(con, "rb") : 
    Failed to connect to modis.ornl.gov port 443: Connection refused
  ── 7. Error: test mt_batch_subset() (@test_download_functions.R#205)  ──────────
  $ operator is invalid for atomic vectors
  1: expect_is(mt_batch_subset(df = df, product = "MOD11A2", band = "LST_Day_1km", internal = TRUE, 
         start = "2004-01-01", end = "2004-03-31"), "data.frame") at testthat/test_download_functions.R:205
  2: quasi_label(enquo(object), label, arg = "object")
  3: eval_bare(get_expr(quo), get_env(quo))
  4: mt_batch_subset(df = df, product = "MOD11A2", band = "LST_Day_1km", internal = TRUE, 
         start = "2004-01-01", end = "2004-03-31")
  5: MODISTools::mt_products()
  6: withVisible(`_f`())
  7: `_f`()
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  [ OK: 0 | SKIPPED: 1 | WARNINGS: 0 | FAILED: 7 ]
  1. Error: test coordinate transforms (@test_coordinate_conversions.R#6) 
  2. Error: test mt_products() (@test_download_functions.R#6) 
  3. Error: test mt_sites() (@test_download_functions.R#10) 
  4. Error: test mt_bands() (@test_download_functions.R#14) 
  5. Error: test mt_dates() (@test_download_functions.R#22) 
  6. Error: test mt_subset() (@test_download_functions.R#67) 
  7. Error: test mt_batch_subset() (@test_download_functions.R#205) 
  
  Error: testthat unit tests failed
  Execution halted