Running ‘testthat.R’ [2s/3s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > # Copyright 2017 Steven E. Pav. All Rights Reserved.
  > # Author: Steven E. Pav
  > 
  > # This file is part of ggallin.
  > #
  > # ggallin is free software: you can redistribute it and/or modify
  > # it under the terms of the GNU Lesser General Public License as published by
  > # the Free Software Foundation, either version 3 of the License, or
  > # (at your option) any later version.
  > #
  > # ggallin is distributed in the hope that it will be useful,
  > # but WITHOUT ANY WARRANTY; without even the implied warranty of
  > # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  > # GNU Lesser General Public License for more details.
  > #
  > # You should have received a copy of the GNU Lesser General Public License
  > # along with ggallin.  If not, see <http://www.gnu.org/licenses/>.
  > 
  > # env var:
  > # nb: 
  > # see also:
  > # todo:
  > # changelog: 
  > #
  > # Created: 2017.09.29
  > # Copyright: Steven E. Pav, 2017-2017
  > # Author: Steven E. Pav
  > # Comments: Steven E. Pav
  > 
  > # because Hadley says it should be like this.
  > # see https://github.com/hadley/devtools/wiki/Testing
  > 
  > library(testthat)
  > library(ggallin)
  Loading required package: ggplot2
  > 
  > test_check("ggallin")
  ── 1. Error: basic usage (@test-basic.r#63)  ───────────────────────────────────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: print(ph) at testthat/test-basic.r:63
  2: print.ggplot(ph)
  3: ggplot_gtable(data)
  4: ggplot_gtable.ggplot_built(data)
  5: layout$render(geom_grobs, data, theme, plot$labels)
  6: f(..., self = self)
  7: self$facet$draw_panels(panels, self$layout, self$panel_scales_x, self$panel_scales_y, 
         self$panel_params, self$coord, data, theme, self$facet_params)
  8: f(...)
  9: render_strips(col_vars, row_vars, params$labeller, theme)
  10: build_strip(x, labeller, theme, TRUE)
  11: ggstrip(grobs, theme, element, gp, horizontal, clip = "on")
  12: Summary.unit(structure(c(4.4, 4.4), unit = 8L, class = c("margin", "unit")), na.rm = FALSE)
  
  ── 2. Error: basic usage (@test-basic.r#82)  ───────────────────────────────────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: print(ph) at testthat/test-basic.r:82
  2: print.ggplot(ph)
  3: grid.draw(gtable)
  4: grid.draw.gTree(gtable)
  5: recordGraphics(drawGTree(x), list(x = x), getNamespace("grid"))
  6: drawGTree(x)
  7: preDraw(x)
  8: preDraw.gTree(x)
  9: pushvpgp(x)
  10: pushgrobvp(x$vp)
  11: pushgrobvp.viewport(x$vp)
  12: pushViewport(vp, recording = FALSE)
  13: lapply(vps, push.vp, recording)
  14: FUN(X[[i]], ...)
  15: push.vp.viewport(X[[i]], ...)
  16: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 3. Error: interp trans (@test-basic.r#102)  ─────────────────────────────────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: print(ph) at testthat/test-basic.r:102
  2: print.ggplot(ph)
  3: grid.draw(gtable)
  4: grid.draw.gTree(gtable)
  5: recordGraphics(drawGTree(x), list(x = x), getNamespace("grid"))
  6: drawGTree(x)
  7: preDraw(x)
  8: preDraw.gTree(x)
  9: pushvpgp(x)
  10: pushgrobvp(x$vp)
  11: pushgrobvp.viewport(x$vp)
  12: pushViewport(vp, recording = FALSE)
  13: lapply(vps, push.vp, recording)
  14: FUN(X[[i]], ...)
  15: push.vp.viewport(X[[i]], ...)
  16: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 4. Error: warp trans (@test-basic.r#142)  ───────────────────────────────────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: print(ph) at testthat/test-basic.r:142
  2: print.ggplot(ph)
  3: grid.draw(gtable)
  4: grid.draw.gTree(gtable)
  5: recordGraphics(drawGTree(x), list(x = x), getNamespace("grid"))
  6: drawGTree(x)
  7: preDraw(x)
  8: preDraw.gTree(x)
  9: pushvpgp(x)
  10: pushgrobvp(x$vp)
  11: pushgrobvp.viewport(x$vp)
  12: pushViewport(vp, recording = FALSE)
  13: lapply(vps, push.vp, recording)
  14: FUN(X[[i]], ...)
  15: push.vp.viewport(X[[i]], ...)
  16: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ── 5. Error: basic usage (@test-basic.r#192)  ──────────────────────────────────
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
  1: print(ph) at testthat/test-basic.r:192
  2: print.ggplot(ph)
  3: grid.draw(gtable)
  4: grid.draw.gTree(gtable)
  5: recordGraphics(drawGTree(x), list(x = x), getNamespace("grid"))
  6: drawGTree(x)
  7: preDraw(x)
  8: preDraw.gTree(x)
  9: pushvpgp(x)
  10: pushgrobvp(x$vp)
  11: pushgrobvp.viewport(x$vp)
  12: pushViewport(vp, recording = FALSE)
  13: lapply(vps, push.vp, recording)
  14: FUN(X[[i]], ...)
  15: push.vp.viewport(X[[i]], ...)
  16: grid.Call.graphics(C_setviewport, vp, TRUE)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 0 SKIPPED: 0 FAILED: 5
  1. Error: basic usage (@test-basic.r#63) 
  2. Error: basic usage (@test-basic.r#82) 
  3. Error: interp trans (@test-basic.r#102) 
  4. Error: warp trans (@test-basic.r#142) 
  5. Error: basic usage (@test-basic.r#192) 
  
  Error: testthat unit tests failed
  Execution halted