Running ‘test-all.R’ [93s/123s]
Running the tests in ‘tests/test-all.R’ failed.
Complete output:
  > library(testthat)
  > 
  > test_check('ggfortify')
  Loading required package: ggfortify
  Loading required package: ggplot2
  initial  value 7.505733 
  final  value 7.505688 
  converged
  Initial stress        : 0.01705
  stress after  10 iters: 0.00951, magic = 0.500
  stress after  20 iters: 0.00941, magic = 0.500
  initial  value 7.505733 
  final  value 7.505688 
  converged
  Initial stress        : 0.01705
  stress after  10 iters: 0.00951, magic = 0.500
  stress after  20 iters: 0.00941, magic = 0.500
  ── 1. Error: fortify.ts works for timeserieses (@test-base_ts.R#13)  ───────────
  arguments imply differing number of rows: 108, 1, 0
  1: autoplot(xts::as.xts(UKgas)) at testthat/test-base_ts.R:13
  2: autoplot.xts(xts::as.xts(UKgas))
  3: ggplot2::fortify(object, scale = ts.scale, is.date = is.date, index.name = index.name)
  4: fortify.zoo(object, scale = ts.scale, is.date = is.date, index.name = index.name)
  5: cbind(data.frame(index(model), ...), coredata(model))
  6: data.frame(index(model), ...)
  7: stop(gettextf("arguments imply differing number of rows: %s", paste(unique(nrows), 
         collapse = ", ")), domain = NA)
  
  ── 2. Error: autoplot works for xts (@test-ts.R#122)  ──────────────────────────
  arguments imply differing number of rows: 144, 1, 0
  1: autoplot(as.xts(AirPassengers), ts.colour = "green") at testthat/test-ts.R:122
  2: autoplot.xts(as.xts(AirPassengers), ts.colour = "green")
  3: ggplot2::fortify(object, scale = ts.scale, is.date = is.date, index.name = index.name)
  4: fortify.zoo(object, scale = ts.scale, is.date = is.date, index.name = index.name)
  5: cbind(data.frame(index(model), ...), coredata(model))
  6: data.frame(index(model), ...)
  7: stop(gettextf("arguments imply differing number of rows: %s", paste(unique(nrows), 
         collapse = ", ")), domain = NA)
  
  ── 3. Error: gglagplot (@test-tslib.R#103)  ────────────────────────────────────
  `x` must be a vector, not a ts object, do you want `stats::lag()`?
  1: gglagplot(AirPassengers) at testthat/test-tslib.R:103
  2: dplyr::bind_rows(lapply(seq(1:lags), .lag))
  3: flatten_bindable(dots_values(...))
  4: dots_values(...)
  5: map(dots, function(dot) eval_bare(dot$expr, dot$env))
  6: lapply(.x, .f, ...)
  7: FUN(X[[i]], ...)
  8: eval_bare(dot$expr, dot$env)
  9: lapply(seq(1:lags), .lag)
  10: FUN(X[[i]], ...)
  11: as.vector(lag(ts, k))
  12: lag(ts, k)
  13: bad_args("x", "must be a vector, not a ts object, do you want `stats::lag()`?")
  14: glubort(fmt_args(args), ..., .envir = .envir)
  15: .abort(text)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 1435 SKIPPED: 9 FAILED: 3
  1. Error: fortify.ts works for timeserieses (@test-base_ts.R#13) 
  2. Error: autoplot works for xts (@test-ts.R#122) 
  3. Error: gglagplot (@test-tslib.R#103) 
  
  Error: testthat unit tests failed
  Execution halted