Running 'testthat.R'
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(ggformula)
  Loading required package: ggplot2
  Loading required package: ggstance
  
  Attaching package: 'ggstance'
  
  The following objects are masked from 'package:ggplot2':
  
      GeomErrorbarh, geom_errorbarh
  
  Loading required package: scales
  Loading required package: ggridges
  
  New to ggformula?  Try the tutorials: 
  	learnr::run_tutorial("introduction", package = "ggformula")
  	learnr::run_tutorial("refining", package = "ggformula")
  > 
  > test_check("ggformula")
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (2)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-lableing.R:7:5): HELPrct labels work ────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-lableing.R:7:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_point(cesd ~ i1, data = mosaicData::HELPrct)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-lableing.R:17:5): Weather labels work ───────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-lableing.R:17:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_point(...)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-lableing.R:26:5): gf_relabel() works ────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-lableing.R:26:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_relabel(...)
    7. └─ggformula::gf_point(mpg ~ hp, color = ~cyl, data = mtcars)
    8.   └─ggformula:::create_extras_and_dots(...)
    9.     ├─base::setdiff(...)
   10.     │ └─base::as.vector(y)
   11.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   12.     │ └─base::as.vector(x)
   13.     └─base::union(stat_formals, geom_formals)
   14.       ├─base::duplicated(u)
   15.       └─base::duplicated.default(u)
  ── Error (test-lableing.R:48:5): set_variable_labels() works ───────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-lableing.R:48:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. └─ggformula::gf_point(., mpg ~ hp, color = ~cyl, data = mtcars)
    7.   └─ggformula:::create_extras_and_dots(...)
    8.     ├─base::setdiff(...)
    9.     │ └─base::as.vector(y)
   10.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   11.     │ └─base::as.vector(x)
   12.     └─base::union(stat_formals, geom_formals)
   13.       ├─base::duplicated(u)
   14.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:12:5): gf_abline() ──────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:12:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_abline(., intercept = 10, slope = 2, color = "red")
    7. └─ggformula::gf_point(bill_length_mm ~ bill_depth_mm, data = penguins2)
    8.   └─ggformula:::create_extras_and_dots(...)
    9.     ├─base::setdiff(...)
   10.     │ └─base::as.vector(y)
   11.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   12.     │ └─base::as.vector(x)
   13.     └─base::union(stat_formals, geom_formals)
   14.       ├─base::duplicated(u)
   15.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:62:5): gf_area() & gf_ribbon() ──────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:62:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_ribbon(...)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:82:5): gf_ash() ─────────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:82:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_ash(~bill_length_mm, color = ~species, data = penguins2)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:100:5): gf_sina() ───────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:100:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_sina(bill_length_mm ~ species, data = penguins2)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:121:5): gf_bar() and gf_col() ───────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:121:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_bar(~species, data = penguins2)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:142:5): gf_barh() and gf_colh() ─────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:142:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_barh(substance ~ ., data = mosaicData::HELPrct)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:162:5): gf_bin2d() ──────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:162:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_refine(., scale_fill_viridis_c(begin = 0.1, end = 0.9))
    7. │ └─base::Reduce(`+`, list(...), init = object)
    8. └─ggformula::gf_bin2d(eruptions ~ waiting, data = faithful, bins = 15)
    9.   └─ggformula:::create_extras_and_dots(...)
   10.     ├─base::setdiff(...)
   11.     │ └─base::as.vector(y)
   12.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   13.     │ └─base::as.vector(x)
   14.     └─base::union(stat_formals, geom_formals)
   15.       ├─base::duplicated(u)
   16.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:172:5): gf_contour(), gf_density2d(), and gf_density_2d() ──
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:172:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_contour(., density ~ waiting + eruptions, data = faithfuld)
    7. └─ggformula::gf_point(eruptions ~ waiting, data = faithful)
    8.   └─ggformula:::create_extras_and_dots(...)
    9.     ├─base::setdiff(...)
   10.     │ └─base::as.vector(y)
   11.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   12.     │ └─base::as.vector(x)
   13.     └─base::union(stat_formals, geom_formals)
   14.       ├─base::duplicated(u)
   15.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:192:5): gf_boxplot() ────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:192:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_boxplot(...)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:216:5): gf_coefline() ───────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:216:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_coefline(., coef = coef(mdl))
    7. │ └─ggformula::gf_abline(...)
    8. └─ggformula::gf_point(bill_length_mm ~ bill_depth_mm, data = penguins2)
    9.   └─ggformula:::create_extras_and_dots(...)
   10.     ├─base::setdiff(...)
   11.     │ └─base::as.vector(y)
   12.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   13.     │ └─base::as.vector(x)
   14.     └─base::union(stat_formals, geom_formals)
   15.       ├─base::duplicated(u)
   16.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:231:5): gf_contour(), gf_density_2d(), gf_density2d() ──
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:231:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_contour(...)
    7. └─ggformula::gf_density_2d(...)
    8.   └─ggformula:::create_extras_and_dots(...)
    9.     ├─base::setdiff(...)
   10.     │ └─base::as.vector(y)
   11.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   12.     │ └─base::as.vector(x)
   13.     └─base::union(stat_formals, geom_formals)
   14.       ├─base::duplicated(u)
   15.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:259:5): gf_countsh(), gf_percentsh(), gf_propsh() ──
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:259:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_countsh(...)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:312:5): gf__counts(), gf_props(), gf_percents() ──
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:312:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_counts(...)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:341:5): gf_crossbar(), gf_errorbar(), gf_pointrange() ──
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:341:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_facet_grid(., ~sex)
    7. ├─ggformula::gf_pointrange(., mean.age + lo + hi ~ substance, data = HELP2)
    8. └─ggformula::gf_jitter(...)
    9.   └─ggformula:::create_extras_and_dots(...)
   10.     ├─base::setdiff(...)
   11.     │ └─base::as.vector(y)
   12.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   13.     │ └─base::as.vector(x)
   14.     └─base::union(stat_formals, geom_formals)
   15.       ├─base::duplicated(u)
   16.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:386:5): gf_crossbarh(), gf_errorbarh(), gf_pointrangeh() ──
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:386:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_facet_grid(., sex ~ .)
    7. ├─ggformula::gf_pointrangeh(...)
    8. └─ggformula::gf_jitter(...)
    9.   └─ggformula:::create_extras_and_dots(...)
   10.     ├─base::setdiff(...)
   11.     │ └─base::as.vector(y)
   12.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   13.     │ └─base::as.vector(x)
   14.     └─base::union(stat_formals, geom_formals)
   15.       ├─base::duplicated(u)
   16.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:447:5): gf_curve() and gf_segment() ─────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:447:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_segment(...)
    7. ├─ggformula::gf_curve(., y1 + y2 ~ x1 + x2, data = SomeData, color = "navy")
    8. └─ggformula::gf_point(mpg ~ wt, data = mtcars)
    9.   └─ggformula:::create_extras_and_dots(...)
   10.     ├─base::setdiff(...)
   11.     │ └─base::as.vector(y)
   12.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   13.     │ └─base::as.vector(x)
   14.     └─base::union(stat_formals, geom_formals)
   15.       ├─base::duplicated(u)
   16.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:458:5): gf_dens() and gf_density ────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:458:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_dens(~bill_length_mm, data = penguins2)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:478:5): gf_dist() ───────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:478:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_dist("norm", mean = 10, sd = 2)
    6.   ├─base::do.call(...)
    7.   └─(function (object = NULL, gformula = NULL, data = NULL, ..., ...
    8.     └─ggformula:::create_extras_and_dots(...)
    9.       ├─base::setdiff(...)
   10.       │ └─base::as.vector(y)
   11.       ├─base::union(union(stat_formals, geom_formals), names(extras))
   12.       │ └─base::as.vector(x)
   13.       └─base::union(stat_formals, geom_formals)
   14.         ├─base::duplicated(u)
   15.         └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:508:5): gf_dotplot() ────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:508:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_labs(., title = "dotdensity")
    7. └─ggformula::gf_dotplot(...)
    8.   └─ggformula:::create_extras_and_dots(...)
    9.     ├─base::setdiff(...)
   10.     │ └─base::as.vector(y)
   11.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   12.     │ └─base::as.vector(x)
   13.     └─base::union(stat_formals, geom_formals)
   14.       ├─base::duplicated(v)
   15.       └─base::duplicated.default(v)
  ── Error (test-layer-factory.R:554:5): gf_fitdistr() ───────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:554:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_dhistogram(...)
    7. └─ggformula::gf_fitdistr(...)
    8.   └─ggformula:::create_extras_and_dots(...)
    9.     ├─base::setdiff(...)
   10.     │ └─base::as.vector(y)
   11.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   12.     │ └─base::as.vector(x)
   13.     └─base::union(stat_formals, geom_formals)
   14.       ├─base::duplicated(u)
   15.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:572:5): gf_freqpoly() ───────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:572:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_freqpoly(~bill_length_mm, color = ~species, data = penguins2)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:604:5): gf_fun2d() ──────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:604:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_refine(., scale_fill_viridis_c())
    7. │ └─base::Reduce(`+`, list(...), init = object)
    8. ├─ggformula::gf_function_2d(...)
    9. │ └─res %>% gf_tile(value ~ x + y, data = Layer_Data, ...) %>% gf_labs(fill = "")
   10. ├─ggformula::gf_labs(., fill = "")
   11. └─ggformula::gf_tile(., value ~ x + y, data = Layer_Data, ...)
   12.   └─ggformula:::create_extras_and_dots(...)
   13.     ├─base::setdiff(...)
   14.     │ └─base::as.vector(y)
   15.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   16.     │ └─base::as.vector(x)
   17.     └─base::union(stat_formals, geom_formals)
   18.       ├─base::duplicated(u)
   19.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:643:5): gf_hex() ────────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:643:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_density2d(...)
    7. └─ggformula::gf_hex(...)
    8.   └─ggformula:::create_extras_and_dots(...)
    9.     ├─base::setdiff(...)
   10.     │ └─base::as.vector(y)
   11.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   12.     │ └─base::as.vector(x)
   13.     └─base::union(stat_formals, geom_formals)
   14.       ├─base::duplicated(u)
   15.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:658:5): gf_histogram() and gf_dhistogram ────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:658:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_histogram(~bill_length_mm, data = penguins2)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:694:5): gf_line() ───────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:694:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_line(births ~ date, data = mosaicData::Births78)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:707:5): gf_label() and gf_text() ────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:707:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_label(...)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:732:5): gf_linerange() and gf_pointrange() ──────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:732:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_refine(...)
    7. │ └─base::Reduce(`+`, list(...), init = object)
    8. ├─ggformula::gf_facet_grid(., city ~ year, scale = "free")
    9. └─ggformula::gf_linerange(...)
   10.   └─ggformula:::create_extras_and_dots(...)
   11.     ├─base::setdiff(...)
   12.     │ └─base::as.vector(y)
   13.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   14.     │ └─base::as.vector(x)
   15.     └─base::union(stat_formals, geom_formals)
   16.       ├─base::duplicated(u)
   17.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:754:5): gf_point() ──────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:754:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_point(bill_length_mm ~ bill_depth_mm, data = penguins2)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:767:5): gf_qq(), gf_qqstep(), gf_qqline() ───────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:767:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─gf_qq(~age | substance, data = mosaicData::HELPrct) %>% gf_qqline()
    6. ├─ggformula::gf_qqline(.)
    7. └─ggformula::gf_qq(~age | substance, data = mosaicData::HELPrct)
    8.   └─ggformula:::create_extras_and_dots(...)
    9.     ├─base::setdiff(...)
   10.     │ └─base::as.vector(y)
   11.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   12.     │ └─base::as.vector(x)
   13.     └─base::union(stat_formals, geom_formals)
   14.       ├─base::duplicated(u)
   15.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:784:5): gf_quantile() ───────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:784:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_quantile(...)
    7. ├─ggformula::gf_quantile(., (1/hwy) ~ displ, quantiles = 0.5, color = "red")
    8. └─ggformula::gf_point((1/hwy) ~ displ, data = mpg)
    9.   └─ggformula:::create_extras_and_dots(...)
   10.     ├─base::setdiff(...)
   11.     │ └─base::as.vector(y)
   12.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   13.     │ └─base::as.vector(x)
   14.     └─base::union(stat_formals, geom_formals)
   15.       ├─base::duplicated(u)
   16.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:796:5): gf_raster(), gf_tile(), gf_density2d() ──
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:796:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. └─ggformula::gf_raster(density ~ eruptions + waiting, data = faithfuld)
    6.   └─ggformula:::create_extras_and_dots(...)
    7.     ├─base::setdiff(...)
    8.     │ └─base::as.vector(y)
    9.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   10.     │ └─base::as.vector(x)
   11.     └─base::union(stat_formals, geom_formals)
   12.       ├─base::duplicated(u)
   13.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:815:5): gf_rect() ───────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:815:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_point(., eruptions ~ waiting, data = faithful)
    7. ├─ggformula::gf_rect(., 3 + 5.5 ~ 68 + 100, fill = "green", alpha = 0.2)
    8. └─ggformula::gf_rect(1.5 + 3 ~ 40 + 68, fill = "red", alpha = 0.2)
    9.   └─ggformula:::create_extras_and_dots(...)
   10.     ├─base::setdiff(...)
   11.     │ └─base::as.vector(y)
   12.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   13.     │ └─base::as.vector(x)
   14.     └─base::union(stat_formals, geom_formals)
   15.       ├─base::duplicated(u)
   16.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:831:5): gf_rect() ───────────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:831:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_spoke(., y ~ x, angle = ~angle, radius = 0.5)
    7. └─ggformula::gf_point(y ~ x, data = SomeData)
    8.   └─ggformula:::create_extras_and_dots(...)
    9.     ├─base::setdiff(...)
   10.     │ └─base::as.vector(y)
   11.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   12.     │ └─base::as.vector(x)
   13.     └─base::union(stat_formals, geom_formals)
   14.       ├─base::duplicated(u)
   15.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:848:5): gf_rug(), etc. ──────────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:848:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─`%>%`(...)
    6. ├─ggformula::gf_rugy(., bill_length_mm ~ ., data = penguins2, color = "green")
    7. │ ├─base::eval(pre)
    8. │ │ └─base::eval(pre)
    9. │ └─base::inherits(object, "gg")
   10. ├─ggformula::gf_rugx(., ~bill_depth_mm, data = penguins2, color = "red")
   11. │ ├─base::eval(pre)
   12. │ │ └─base::eval(pre)
   13. │ └─base::inherits(object, "gg")
   14. └─ggformula::gf_point(bill_length_mm ~ bill_depth_mm, data = penguins2)
   15.   └─ggformula:::create_extras_and_dots(...)
   16.     ├─base::setdiff(...)
   17.     │ └─base::as.vector(y)
   18.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   19.     │ └─base::as.vector(x)
   20.     └─base::union(stat_formals, geom_formals)
   21.       ├─base::duplicated(u)
   22.       └─base::duplicated.default(u)
  ── Error (test-layer-factory.R:929:5): discrete_breaks() ───────────────────────
  Error: duplicated() applies only to vectors
  Backtrace:
       █
    1. ├─ggformula:::wrapped_expect_doppelganger(...) test-layer-factory.R:929:4
    2. │ └─vdiffr::expect_doppelganger(title, fig, path = path, ...)
    3. │   └─vdiffr:::writer(fig, testcase, title)
    4. │     └─vdiffr:::print_plot(plot, title)
    5. ├─gf_histogram(~bill_length_mm, data = penguins2) %>% gf_refine(scale_x_continuous(breaks = discrete_breaks()))
    6. ├─ggformula::gf_refine(., scale_x_continuous(breaks = discrete_breaks()))
    7. │ └─base::Reduce(`+`, list(...), init = object)
    8. └─ggformula::gf_histogram(~bill_length_mm, data = penguins2)
    9.   └─ggformula:::create_extras_and_dots(...)
   10.     ├─base::setdiff(...)
   11.     │ └─base::as.vector(y)
   12.     ├─base::union(union(stat_formals, geom_formals), names(extras))
   13.     │ └─base::as.vector(x)
   14.     └─base::union(stat_formals, geom_formals)
   15.       ├─base::duplicated(u)
   16.       └─base::duplicated.default(u)
  
  [ FAIL 39 | WARN 0 | SKIP 2 | PASS 0 ]
  Error: Test failures
  Execution halted