Running ‘CausalImpact_import_test.R’ [4s/6s]
  Running ‘testthat.R’ [32s/48s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > # Copyright 2014 Google Inc. All rights reserved.
  > #
  > # Licensed under the Apache License, Version 2.0 (the "License");
  > # you may not use this file except in compliance with the License.
  > # You may obtain a copy of the License at
  > #
  > # http://www.apache.org/licenses/LICENSE-2.0
  > #
  > # Unless required by applicable law or agreed to in writing, software
  > # distributed under the License is distributed on an "AS IS" BASIS,
  > # WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  > # See the License for the specific language governing permissions and
  > # limitations under the License.
  > 
  > # Unit test driver for the CausalImpact package.
  > #
  > # Author: kbrodersen@google.com (Kay Brodersen)
  > 
  > library(CausalImpact)
  Loading required package: bsts
  Loading required package: BoomSpikeSlab
  Loading required package: Boom
  Loading required package: MASS
  
  Attaching package: 'Boom'
  
  The following object is masked from 'package:stats':
  
      rWishart
  
  
  Attaching package: 'BoomSpikeSlab'
  
  The following object is masked from 'package:stats':
  
      knots
  
  Loading required package: zoo
  
  Attaching package: 'zoo'
  
  The following objects are masked from 'package:base':
  
      as.Date, as.Date.numeric
  
  Loading required package: xts
  
  Attaching package: 'bsts'
  
  The following object is masked from 'package:BoomSpikeSlab':
  
      SuggestBurn
  
  > library(testthat)
  > 
  > # Open graphics device and run tests
  > plot.file <- tempfile("CausalImpact", fileext = ".png")
  > png(plot.file)
  > testthat::test_check("CausalImpact")
  [1] -2
  [1] 9.1
  [1] "foo"
  [1] 100 200
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-impact-analysis.R:711:3): PrintSummary ──────────────────────────
  Error: invalid value 0 for 'digits' argument
  Backtrace:
       █
    1. ├─testthat::expect_output(PrintSummary(impact, digits = 0), "\\([0-9]+\\)") test-impact-analysis.R:711:2
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat:::.capture(...)
    4. │   │ └─testthat::capture_output_lines(code, print, width = width)
    5. │   │   └─testthat:::eval_with_output(code, print = print, width = width)
    6. │   │     ├─withr::with_output_sink(temp, withVisible(code))
    7. │   │     │ └─base::force(code)
    8. │   │     └─base::withVisible(code)
    9. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   10. └─CausalImpact:::PrintSummary(impact, digits = 0)
   11.   ├─base::data.frame(...)
   12.   └─CausalImpact:::FormatNumber(summary$Actual)
   13.     ├─CausalImpact:::StrTrim(format(x, digits = digits))
   14.     │ └─base::gsub("^\\s+|\\s+$", "", x)
   15.     │   └─base::is.factor(x)
   16.     ├─base::format(x, digits = digits)
   17.     └─base::format.default(x, digits = digits)
   18.       └─base::prettyNum(...)
  
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 727 ]
  Error: Test failures
  Execution halted