Running 'testthat.R' [18s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > test_check("wikipediatrend")
  Loading required package: wikipediatrend
  
    [wikipediatrend]
      
    Note:
      
      - Data before 2016-01-01 
        * is provided by petermeissner.de and
        * was prepared in a project commissioned by the Hertie School of Governance (Prof. Dr. Simon Munzert)
        * and supported by the Daimler and Benz Foundation.
      
      - Data from 2016-01-01 onwards 
        * is provided by the Wikipedia Foundation
        * via its pageviews package and API.
      
  == Failed tests ================================================================
  -- Failure (test_aux.R:6:3): wp_linked_pages() is robust against no-data, sparse data --
  `{ ... }` threw an error.
  Message: Failed to connect to en.wikipedia.org port 443: Timed out
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) test_aux.R:6:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat:::.capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. \-wikipediatrend::wp_linked_pages(...) test_aux.R:8:6
    7.   +-xml2::read_html(url)
    8.   \-xml2:::read_html.default(url)
    9.     +-base::suppressWarnings(...)
   10.     | \-base::withCallingHandlers(...)
   11.     +-xml2::read_xml(x, encoding = encoding, ..., as_html = TRUE, options = options)
   12.     \-xml2:::read_xml.character(...)
   13.       \-xml2:::read_xml.connection(...)
   14.         +-base::open(x, "rb")
   15.         \-base::open.connection(x, "rb")
  -- Failure (test_wp_trend.R:5:3): wp_trend() -----------------------------------
  `wp_trend(page = "Test")` produced warnings.
  -- Error (test_wp_trend.R:9:3): wp_trend() -------------------------------------
  Error: argument 1 is not a vector
  Backtrace:
       x
    1. +-testthat::expect_silent(...) test_wp_trend.R:9:2
    2. | \-testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. |   +-testthat:::.capture(...)
    4. |   | +-withr::with_output_sink(...)
    5. |   | | \-base::force(code)
    6. |   | +-base::withCallingHandlers(...)
    7. |   | \-base::withVisible(code)
    8. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. \-wikipediatrend::wp_trend(...)
   10.   \-base::order(res$date, res$language, res$article)
  
  [ FAIL 3 | WARN 0 | SKIP 0 | PASS 40 ]
  Error: Test failures
  In addition: Warning message:
  In .Internal(getRegisteredNamespace(name)) :
    closing unused connection 4 (https://en.wikipedia.org/wiki/Sheerness_Lifeboat_Station)
  Execution halted