Running ‘testthat.R’ [12s/15s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(funData)
  
  Attaching package: 'funData'
  
  The following object is masked from 'package:stats':
  
      integrate
  
  The following object is masked from 'package:base':
  
      norm
  
  > 
  > test_check("funData")
  ── 1. Failure: ggplots (@test_plotMethods.R#57)  ───────────────────────────────
  `ggplot(...)` did not throw an error.
  
  ── 2. Failure: ggplots (@test_plotMethods.R#59)  ───────────────────────────────
  `ggplot(...)` did not throw an error.
  
  ── 3. Failure: ggplots (@test_plotMethods.R#66)  ───────────────────────────────
  ggplot(object1D) is not an S3 object
  
  ── 4. Failure: ggplots (@test_plotMethods.R#66)  ───────────────────────────────
  ggplot(object1D) inherits from `NULL` not `ggplot`.
  
  ── 5. Failure: ggplots (@test_plotMethods.R#74)  ───────────────────────────────
  ggplot(object2D, obs = 1) is not an S3 object
  
  ── 6. Failure: ggplots (@test_plotMethods.R#74)  ───────────────────────────────
  ggplot(object2D, obs = 1) inherits from `NULL` not `ggplot`.
  
  ── 7. Error: ggplots (@test_plotMethods.R#77)  ─────────────────────────────────
  only 'grobs' allowed in "gList"
  1: expect_equal(length(ggplot(multiFunData(object1D, 2 * object1D), plotGrid = TRUE)), 
         2) at testthat/test_plotMethods.R:77
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: ggplot(multiFunData(object1D, 2 * object1D), plotGrid = TRUE)
  5: ggplot(multiFunData(object1D, 2 * object1D), plotGrid = TRUE)
  6: ggplot.multiFunData(data, ...)
  7: gridExtra::grid.arrange(grobs = p, nrow = 1)
  8: grid.draw(g)
  9: grid.draw.gTree(g)
  10: recordGraphics(drawGTree(x), list(x = x), getNamespace("grid"))
  11: drawGTree(x)
  12: makeContent(x)
  13: makeContent.gtable(x)
  14: setChildren(x, do.call("gList", x$grobs[order(x$layout$z)]))
  15: do.call("gList", x$grobs[order(x$layout$z)])
  16: gList(structure(list(wrapvp = structure(list(x = structure(0.5, class = "unit", valid.unit = 0L, unit = "npc"), 
         y = structure(0.5, class = "unit", valid.unit = 0L, unit = "npc"), width = structure(1, class = "unit", valid.unit = 0L, unit = "npc"), 
         height = structure(1, class = "unit", valid.unit = 0L, unit = "npc"), justification = "centre", 
         gp = structure(list(), class = "gpar"), clip = NA, xscale = c(0, 1), yscale = c(0, 
         1), angle = 0, layout = NULL, layout.pos.row = c(1L, 1L), layout.pos.col = c(1L, 
         1L), valid.just = c(0.5, 0.5), valid.pos.row = c(1L, 1L), valid.pos.col = c(1L, 
         1L), name = "arrange.1-1-1-1"), .Names = c("x", "y", "width", "height", "justification", 
     "gp", "clip", "xscale", "yscale", "angle", "layout", "layout.pos.row", "layout.pos.col", 
     "valid.just", "valid.pos.row", "valid.pos.col", "name"), class = "viewport"), name = "arrange.1-1-1-1"), .Names = c("wrapvp", 
     "name"), class = c("gTableChild", "list")), structure(list(wrapvp = structure(list(
         x = structure(0.5, class = "unit", valid.unit = 0L, unit = "npc"), y = structure(0.5, class = "unit", valid.unit = 0L, unit = "npc"), 
         width = structure(1, class = "unit", valid.unit = 0L, unit = "npc"), height = structure(1, class = "unit", valid.unit = 0L, unit = "npc"), 
         justification = "centre", gp = structure(list(), class = "gpar"), clip = NA, 
         xscale = c(0, 1), yscale = c(0, 1), angle = 0, layout = NULL, layout.pos.row = c(1L, 
         1L), layout.pos.col = c(2L, 2L), valid.just = c(0.5, 0.5), valid.pos.row = c(1L, 
         1L), valid.pos.col = c(2L, 2L), name = "arrange.1-2-1-2"), .Names = c("x", "y", 
     "width", "height", "justification", "gp", "clip", "xscale", "yscale", "angle", "layout", 
     "layout.pos.row", "layout.pos.col", "valid.just", "valid.pos.row", "valid.pos.col", 
     "name"), class = "viewport"), name = "arrange.1-2-1-2"), .Names = c("wrapvp", "name"
     ), class = c("gTableChild", "list")))
  17: stop("only 'grobs' allowed in \"gList\"")
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 259 SKIPPED: 1 FAILED: 7
  1. Failure: ggplots (@test_plotMethods.R#57) 
  2. Failure: ggplots (@test_plotMethods.R#59) 
  3. Failure: ggplots (@test_plotMethods.R#66) 
  4. Failure: ggplots (@test_plotMethods.R#66) 
  5. Failure: ggplots (@test_plotMethods.R#74) 
  6. Failure: ggplots (@test_plotMethods.R#74) 
  7. Error: ggplots (@test_plotMethods.R#77) 
  
  Error: testthat unit tests failed
  Execution halted