Running ‘testthat.R’ [3s/3s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(autoplotly)
  > 
  > test_check("autoplotly")
  ── 1. Error: autoplotly works correctly (@test_all.R#7)  ───────────────────────
  SETLENGTH() cannot be applied to an ALTVEC object.
  1: autoplotly(result, data = iris, colour = "Species", label = TRUE, label.size = 3, 
         frame = TRUE) at testthat/test_all.R:7
  2: autoplotly.default(result, data = iris, colour = "Species", label = TRUE, label.size = 3, 
         frame = TRUE)
  3: ggplotly(ggplot_obj, width = width, height = height, tooltip = tooltip, dynamicTicks = dynamicTicks, 
         layerData = layerData, originalData = originalData, source = source)
  4: ggplotly.ggplot(ggplot_obj, width = width, height = height, tooltip = tooltip, dynamicTicks = dynamicTicks, 
         layerData = layerData, originalData = originalData, source = source)
  5: gg2list(p, width = width, height = height, tooltip = tooltip, dynamicTicks = dynamicTicks, 
         layerData = layerData, originalData = originalData, source = source, ...)
  6: gg2list_legacy(p, width = width, height = height, tooltip = tooltip, layerData = layerData, 
         originalData = originalData, source = source, ...)
  7: layers2traces(data, prestats_data, layout$panel_layout, plot)
  8: Map(geom2trace, dl, paramz[i], list(p))
  9: mapply(FUN = f, ..., SIMPLIFY = FALSE)
  10: (function (data, params, p) 
     {
         if (nrow(data) == 0) 
             return(geom2trace.GeomBlank(data, params, p))
         UseMethod("geom2trace")
     })(dots[[1L]][[1L]], dots[[2L]][[1L]], dots[[3L]][[1L]])
  11: geom2trace.GeomPolygon(dots[[1L]][[1L]], dots[[2L]][[1L]], dots[[3L]][[1L]])
  12: group2NA(data)
  13: dt[, c(.I, .I[1], NA), by = keyVars]
  14: `[.data.table`(dt, , c(.I, .I[1], NA), by = keyVars)
  
  ── 2. Error: autoplotly is composable with additional ggplot2 elements (@test_al
  SETLENGTH() cannot be applied to an ALTVEC object.
  1: autoplotly(result, data = iris, colour = "Species", label = TRUE, label.size = 3, 
         frame = TRUE) at testthat/test_all.R:13
  2: autoplotly.default(result, data = iris, colour = "Species", label = TRUE, label.size = 3, 
         frame = TRUE)
  3: ggplotly(ggplot_obj, width = width, height = height, tooltip = tooltip, dynamicTicks = dynamicTicks, 
         layerData = layerData, originalData = originalData, source = source)
  4: ggplotly.ggplot(ggplot_obj, width = width, height = height, tooltip = tooltip, dynamicTicks = dynamicTicks, 
         layerData = layerData, originalData = originalData, source = source)
  5: gg2list(p, width = width, height = height, tooltip = tooltip, dynamicTicks = dynamicTicks, 
         layerData = layerData, originalData = originalData, source = source, ...)
  6: gg2list_legacy(p, width = width, height = height, tooltip = tooltip, layerData = layerData, 
         originalData = originalData, source = source, ...)
  7: layers2traces(data, prestats_data, layout$panel_layout, plot)
  8: Map(geom2trace, dl, paramz[i], list(p))
  9: mapply(FUN = f, ..., SIMPLIFY = FALSE)
  10: (function (data, params, p) 
     {
         if (nrow(data) == 0) 
             return(geom2trace.GeomBlank(data, params, p))
         UseMethod("geom2trace")
     })(dots[[1L]][[1L]], dots[[2L]][[1L]], dots[[3L]][[1L]])
  11: geom2trace.GeomPolygon(dots[[1L]][[1L]], dots[[2L]][[1L]], dots[[3L]][[1L]])
  12: group2NA(data)
  13: dt[, c(.I, .I[1], NA), by = keyVars]
  14: `[.data.table`(dt, , c(.I, .I[1], NA), by = keyVars)
  
  ── 3. Error: autoplotly accepts additional plotly args (@test_all.R#26)  ───────
  SETLENGTH() cannot be applied to an ALTVEC object.
  1: autoplotly(result, data = iris, colour = "Species", label = TRUE, label.size = 3, 
         frame = TRUE, tooltip = "all", dynamicTicks = FALSE, layerData = 1, originalData = TRUE, 
         source = "A") at testthat/test_all.R:26
  2: autoplotly.default(result, data = iris, colour = "Species", label = TRUE, label.size = 3, 
         frame = TRUE, tooltip = "all", dynamicTicks = FALSE, layerData = 1, originalData = TRUE, 
         source = "A")
  3: ggplotly(ggplot_obj, width = width, height = height, tooltip = tooltip, dynamicTicks = dynamicTicks, 
         layerData = layerData, originalData = originalData, source = source)
  4: ggplotly.ggplot(ggplot_obj, width = width, height = height, tooltip = tooltip, dynamicTicks = dynamicTicks, 
         layerData = layerData, originalData = originalData, source = source)
  5: gg2list(p, width = width, height = height, tooltip = tooltip, dynamicTicks = dynamicTicks, 
         layerData = layerData, originalData = originalData, source = source, ...)
  6: gg2list_legacy(p, width = width, height = height, tooltip = tooltip, layerData = layerData, 
         originalData = originalData, source = source, ...)
  7: layers2traces(data, prestats_data, layout$panel_layout, plot)
  8: Map(geom2trace, dl, paramz[i], list(p))
  9: mapply(FUN = f, ..., SIMPLIFY = FALSE)
  10: (function (data, params, p) 
     {
         if (nrow(data) == 0) 
             return(geom2trace.GeomBlank(data, params, p))
         UseMethod("geom2trace")
     })(dots[[1L]][[1L]], dots[[2L]][[1L]], dots[[3L]][[1L]])
  11: geom2trace.GeomPolygon(dots[[1L]][[1L]], dots[[2L]][[1L]], dots[[3L]][[1L]])
  12: group2NA(data)
  13: dt[, c(.I, .I[1], NA), by = keyVars]
  14: `[.data.table`(dt, , c(.I, .I[1], NA), by = keyVars)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 1 SKIPPED: 0 FAILED: 3
  1. Error: autoplotly works correctly (@test_all.R#7) 
  2. Error: autoplotly is composable with additional ggplot2 elements (@test_all.R#13) 
  3. Error: autoplotly accepts additional plotly args (@test_all.R#26) 
  
  Error: testthat unit tests failed
  Execution halted