Running ‘sleep.R’ [1s/1s]
  Comparing ‘sleep.Rout’ to ‘sleep.Rout.save’ ... OK
  Running ‘testthat.R’ [33s/36s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(estimatr)
  > 
  > test_check("estimatr")
  ── 1. Failure: multiple outcomes (@test-lm-robust.R#640)  ──────────────────────
  sandwich::vcovHC(lmo, type = "HC0") not equal to vcov(lm_robust(cbind(mpg, hp) ~ cyl, data = mtcars, se_type = "HC0")).
  8/16 mismatches (average diff: 14.6)
  [3]  -16.45 - 27.902 == -44.353
  [4]    2.47 - -4.008 ==   6.475
  [7]    2.47 - -4.008 ==   6.475
  [8]   -0.39 -  0.609 ==  -0.999
  [9]  -16.45 - 27.902 == -44.353
  [10]   2.47 - -4.008 ==   6.475
  [13]   2.47 - -4.008 ==   6.475
  [14]  -0.39 -  0.609 ==  -0.999
  
  ── 2. Failure: multiple outcomes (@test-lm-robust.R#644)  ──────────────────────
  sandwich::vcovHC(lmo, type = "HC1") not equal to vcov(lm_robust(cbind(mpg, hp) ~ cyl, data = mtcars, se_type = "HC1")).
  8/16 mismatches (average diff: 15.5)
  [3]  -17.547 - 29.76 == -47.31
  [4]    2.632 - -4.27 ==   6.91
  [7]    2.632 - -4.27 ==   6.91
  [8]   -0.416 -  0.65 ==  -1.07
  [9]  -17.547 - 29.76 == -47.31
  [10]   2.632 - -4.27 ==   6.91
  [13]   2.632 - -4.27 ==   6.91
  [14]  -0.416 -  0.65 ==  -1.07
  
  ── 3. Failure: multiple outcomes (@test-lm-robust.R#648)  ──────────────────────
  sandwich::vcovHC(lmo, type = "HC2") not equal to vcov(lm_robust(cbind(mpg, hp) ~ cyl, data = mtcars, se_type = "HC2")).
  8/16 mismatches (average diff: 15.8)
  [3]  -17.827 - 30.220 == -48.05
  [4]    2.669 - -4.337 ==   7.01
  [7]    2.669 - -4.337 ==   7.01
  [8]   -0.421 -  0.658 ==  -1.08
  [9]  -17.827 - 30.220 == -48.05
  [10]   2.669 - -4.337 ==   7.01
  [13]   2.669 - -4.337 ==   7.01
  [14]  -0.421 -  0.658 ==  -1.08
  
  ── 4. Failure: multiple outcomes (@test-lm-robust.R#652)  ──────────────────────
  sandwich::vcovHC(lmo, type = "HC3") not equal to vcov(lm_robust(cbind(mpg, hp) ~ cyl, data = mtcars, se_type = "HC3")).
  8/16 mismatches (average diff: 17.1)
  [3]  -19.319 - 32.733 == -52.05
  [4]    2.887 - -4.694 ==   7.58
  [7]    2.887 - -4.694 ==   7.58
  [8]   -0.454 -  0.712 ==  -1.17
  [9]  -19.319 - 32.733 == -52.05
  [10]   2.887 - -4.694 ==   7.58
  [13]   2.887 - -4.694 ==   7.58
  [14]  -0.454 -  0.712 ==  -1.17
  
  ── 5. Error: starprep works (@test-starprep.R#11)  ─────────────────────────────
  no method to invoke
  1: expect_output(stargazer::stargazer(fit_1, fit_2, type = "text", se = starprep(fit_1_r, 
         fit_2), p = starprep(fit_1_r, fit_2, stat = "p.value")), "\\(0\\.015\\)\\s+\\(0\\.015\\)") at testthat/test-starprep.R:11
  2: quasi_capture(enquo(object), capture_output, label = label)
  3: capture(act$val <- eval_bare(get_expr(quo), get_env(quo)))
  4: capture_output_lines(code, print, width = width)
  5: eval_with_output(code, print = print, width = width)
  6: withr::with_output_sink(temp, withVisible(code))
  7: force(code)
  8: withVisible(code)
  9: eval_bare(get_expr(quo), get_env(quo))
  10: stargazer::stargazer(fit_1, fit_2, type = "text", se = starprep(fit_1_r, fit_2), 
         p = starprep(fit_1_r, fit_2, stat = "p.value"))
  11: .stargazer.wrap(..., type = type, title = title, style = style, summary = summary, 
         out = out, out.header = out.header, column.labels = column.labels, column.separate = column.separate, 
         covariate.labels = covariate.labels, dep.var.caption = dep.var.caption, dep.var.labels = dep.var.labels, 
         dep.var.labels.include = dep.var.labels.include, align = align, coef = coef, 
         se = se, t = t, p = p, t.auto = t.auto, p.auto = p.auto, ci = ci, ci.custom = ci.custom, 
         ci.level = ci.level, ci.separator = ci.separator, add.lines = add.lines, apply.coef = apply.coef, 
         apply.se = apply.se, apply.t = apply.t, apply.p = apply.p, apply.ci = apply.ci, 
         colnames = colnames, column.sep.width = column.sep.width, decimal.mark = decimal.mark, 
         df = df, digit.separate = digit.separate, digit.separator = digit.separator, 
         digits = digits, digits.extra = digits.extra, flip = flip, float = float, float.env = float.env, 
         font.size = font.size, header = header, initial.zero = initial.zero, intercept.bottom = intercept.bottom, 
         intercept.top = intercept.top, keep = keep, keep.stat = keep.stat, label = label, 
         model.names = model.names, model.numbers = model.numbers, multicolumn = multicolumn, 
         no.space = no.space, notes = notes, notes.align = notes.align, notes.append = notes.append, 
         notes.label = notes.label, object.names = object.names, omit = omit, omit.labels = omit.labels, 
         omit.stat = omit.stat, omit.summary.stat = omit.summary.stat, omit.table.layout = omit.table.layout, 
         omit.yes.no = omit.yes.no, order = order, ord.intercepts = ord.intercepts, perl = perl, 
         report = report, rownames = rownames, rq.se = rq.se, selection.equation = selection.equation, 
         single.row = single.row, star.char = star.char, star.cutoffs = star.cutoffs, 
         suppress.errors = suppress.errors, table.layout = table.layout, table.placement = table.placement, 
         zero.component = zero.component, summary.logical = summary.logical, summary.stat = summary.stat, 
         nobs = nobs, mean.sd = mean.sd, min.max = min.max, median = median, iqr = iqr, 
         warn = save.warn.option)
  12: .turn.into.list(se)
  13: starprep(fit_1_r, fit_2)
  14: lapply(list(...), function(x) {
         if (class(x)[1] == "lm") 
             commarobust(x, se_type = se_type, clusters = clusters, alpha = alpha)
         else x
     })
  15: FUN(X[[i]], ...)
  16: commarobust(x, se_type = se_type, clusters = clusters, alpha = alpha)
  17: model.matrix.lm(model)
  18: NextMethod("model.matrix", data = data, contrasts.arg = object$contrasts)
  
  ── 6. Failure: commarobust works with regular lm (@test-starprep.R#51)  ────────
  `clo <- commarobust(lo, clusters = datmiss$cl, se_type = "CR0")` threw an error with unexpected message.
  Expected match: "`clusters` must be the same length as the model data."
  Actual message: "no method to invoke"
  
  ── 7. Error: commarobust works with regular lm (@test-starprep.R#59)  ──────────
  no method to invoke
  1: commarobust(lo, se_type = "classical") at testthat/test-starprep.R:59
  2: model.matrix.lm(model)
  3: NextMethod("model.matrix", data = data, contrasts.arg = object$contrasts)
  
  ── 8. Error: commarobust works with weighted lm (@test-starprep.R#259)  ────────
  no method to invoke
  1: commarobust(lo, se_type = "classical") at testthat/test-starprep.R:259
  2: model.matrix.lm(model)
  3: NextMethod("model.matrix", data = data, contrasts.arg = object$contrasts)
  
  ── 9. Error: commarobust works with dependency, weighted lm (@test-starprep.R#42
  no method to invoke
  1: commarobust(lo, se_type = "classical") at testthat/test-starprep.R:427
  2: model.matrix.lm(model)
  3: NextMethod("model.matrix", data = data, contrasts.arg = object$contrasts)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 739 SKIPPED: 0 FAILED: 9
  1. Failure: multiple outcomes (@test-lm-robust.R#640) 
  2. Failure: multiple outcomes (@test-lm-robust.R#644) 
  3. Failure: multiple outcomes (@test-lm-robust.R#648) 
  4. Failure: multiple outcomes (@test-lm-robust.R#652) 
  5. Error: starprep works (@test-starprep.R#11) 
  6. Failure: commarobust works with regular lm (@test-starprep.R#51) 
  7. Error: commarobust works with regular lm (@test-starprep.R#59) 
  8. Error: commarobust works with weighted lm (@test-starprep.R#259) 
  9. Error: commarobust works with dependency, weighted lm (@test-starprep.R#427) 
  
  Error: testthat unit tests failed
  Execution halted