Running 'test-all.R' [35s/40s]
Running the tests in 'tests/test-all.R' failed.
Complete output:
  > library(testthat)
  > test_check("rtext")
  Loading required package: rtext
  Loading required package: stringb
  -- ERROR (test_rtext.R:40:3): rtext tokenize_data_regex ------------------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_rtext.R:40:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-dings$char_data_set("toast", 1:dings$char_length(), "uggah") test_rtext.R:43:4
    5. | \-rbind_fill(private$char_data[[x]], add_df) %>% dp_arrange("i")
    6. \-rtext:::dp_arrange(., "i")
    7.   +-df[eval(parse(text = order_call)), ]
    8.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
    9.   +-base::eval(parse(text = order_call))
   10.   | \-base::eval(parse(text = order_call))
   11.   \-base::order(df["i"])
   12.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   13.       \-base:::FUN(X[[i]], ...)
   14.         +-base::as.vector(xtfrm(x))
   15.         +-base::xtfrm(x)
   16.         \-base::xtfrm.default(x)
  
  -- ERROR (test_rtext.R:91:3): rtext tokenize_data_words ------------------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_rtext.R:91:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-dings$char_data_set("test", 1:5, 1) test_rtext.R:93:4
    5. | \-rbind_fill(private$char_data[[x]], add_df) %>% dp_arrange("i")
    6. \-rtext:::dp_arrange(., "i")
    7.   +-df[eval(parse(text = order_call)), ]
    8.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
    9.   +-base::eval(parse(text = order_call))
   10.   | \-base::eval(parse(text = order_call))
   11.   \-base::order(df["i"])
   12.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   13.       \-base:::FUN(X[[i]], ...)
   14.         +-base::as.vector(xtfrm(x))
   15.         +-base::xtfrm(x)
   16.         \-base::xtfrm.default(x)
  
  -- ERROR (test_rtext.R:116:3): rtext tokenize_data_lines -----------------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_rtext.R:116:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-dings$char_data_set("test", 1:20, 1) test_rtext.R:118:4
    5. | \-rbind_fill(private$char_data[[x]], add_df) %>% dp_arrange("i")
    6. \-rtext:::dp_arrange(., "i")
    7.   +-df[eval(parse(text = order_call)), ]
    8.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
    9.   +-base::eval(parse(text = order_call))
   10.   | \-base::eval(parse(text = order_call))
   11.   \-base::order(df["i"])
   12.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   13.       \-base:::FUN(X[[i]], ...)
   14.         +-base::as.vector(xtfrm(x))
   15.         +-base::xtfrm(x)
   16.         \-base::xtfrm.default(x)
  
  -- ERROR (test_rtext_base.R:32:3): rtext_base char_data_get() works ------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_rtext_base.R:32:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-dings$char_data_set("data2", 1:3, 1) test_rtext_base.R:35:4
    5. | \-rbind_fill(private$char_data[[x]], add_df) %>% dp_arrange("i")
    6. \-rtext:::dp_arrange(., "i")
    7.   +-df[eval(parse(text = order_call)), ]
    8.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
    9.   +-base::eval(parse(text = order_call))
   10.   | \-base::eval(parse(text = order_call))
   11.   \-base::order(df["i"])
   12.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   13.       \-base:::FUN(X[[i]], ...)
   14.         +-base::as.vector(xtfrm(x))
   15.         +-base::xtfrm(x)
   16.         \-base::xtfrm.default(x)
  
  -- ERROR (test_rtext_base.R:87:3): rtext_base char_data_set() works ------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_rtext_base.R:87:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-dings$char_data_set("pimpf", c(1, 2, 6, 7), 1) test_rtext_base.R:89:4
    5. | \-rbind_fill(private$char_data[[x]], add_df) %>% dp_arrange("i")
    6. \-rtext:::dp_arrange(., "i")
    7.   +-df[eval(parse(text = order_call)), ]
    8.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
    9.   +-base::eval(parse(text = order_call))
   10.   | \-base::eval(parse(text = order_call))
   11.   \-base::order(df["i"])
   12.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   13.       \-base:::FUN(X[[i]], ...)
   14.         +-base::as.vector(xtfrm(x))
   15.         +-base::xtfrm(x)
   16.         \-base::xtfrm.default(x)
  
  -- ERROR (test_rtext_base.R:434:3): rtext_base char_data_get() with levels works
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_rtext_base.R:434:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-dings$char_data_set("data", 5:7, "val1", hl = 0) test_rtext_base.R:436:4
    5. | \-rbind_fill(private$char_data[[x]], add_df) %>% dp_arrange("i")
    6. \-rtext:::dp_arrange(., "i")
    7.   +-df[eval(parse(text = order_call)), ]
    8.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
    9.   +-base::eval(parse(text = order_call))
   10.   | \-base::eval(parse(text = order_call))
   11.   \-base::order(df["i"])
   12.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   13.       \-base:::FUN(X[[i]], ...)
   14.         +-base::as.vector(xtfrm(x))
   15.         +-base::xtfrm(x)
   16.         \-base::xtfrm.default(x)
  
  -- ERROR (test_rtext_base.R:485:3): rtext_base tokenize_data_regex -------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_rtext_base.R:485:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-dings$char_data_set_regex("empteyh", " ", 1) test_rtext_base.R:487:4
    5. | \-self$char_data_set(x = x, i = found_is, val = val, hl = hl)
    6. |   \-rbind_fill(private$char_data[[x]], add_df) %>% dp_arrange("i")
    7. \-rtext:::dp_arrange(., "i")
    8.   +-df[eval(parse(text = order_call)), ]
    9.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   10.   +-base::eval(parse(text = order_call))
   11.   | \-base::eval(parse(text = order_call))
   12.   \-base::order(df["i"])
   13.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   14.       \-base:::FUN(X[[i]], ...)
   15.         +-base::as.vector(xtfrm(x))
   16.         +-base::xtfrm(x)
   17.         \-base::xtfrm.default(x)
  
  -- ERROR (test_rtext_base.R:529:3): rtext_base text_get_lines() works ----------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_rtext_base.R:529:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-dings$text_get_lines() test_rtext_base.R:531:4
    5.   +-stringb::text_tokenize(tmp_text, "\n")
    6.   \-stringb:::text_tokenize.default(tmp_text, "\n")
    7.     \-stringb:::stringb_arrange(token, "from", "to")
    8.       +-df[eval(parse(text = order_call)), ]
    9.       +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   10.       +-base::eval(parse(text = order_call))
   11.       | \-base::eval(parse(text = order_call))
   12.       \-base::order(df["from"], df["to"])
   13.         \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   14.           \-base:::FUN(X[[i]], ...)
   15.             +-base::as.vector(xtfrm(x))
   16.             +-base::xtfrm(x)
   17.             \-base::xtfrm.default(x)
  
  -- FAILURE (test_rtext_export.R:16:3): rtext_export prepare_save() and execute_l
  `{ ... }` threw an error.
  Message: cannot xtfrm 'x'
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) test_rtext_export.R:16:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat:::.capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-dings$char_data_set("x33", 1:10, 10:1) test_rtext_export.R:17:4
    7. | \-rbind_fill(private$char_data[[x]], add_df) %>% dp_arrange("i")
    8. \-rtext:::dp_arrange(., "i")
    9.   +-df[eval(parse(text = order_call)), ]
   10.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   11.   +-base::eval(parse(text = order_call))
   12.   | \-base::eval(parse(text = order_call))
   13.   \-base::order(df["i"])
   14.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   15.       \-base:::FUN(X[[i]], ...)
   16.         +-base::as.vector(xtfrm(x))
   17.         +-base::xtfrm(x)
   18.         \-base::xtfrm.default(x)
  
  -- FAILURE (test_tools.R:14:3): tools plot.rtext -------------------------------
  `{ ... }` threw an error.
  Message: cannot xtfrm 'x'
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) test_tools.R:14:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat:::.capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-base::plot(dings) test_tools.R:17:4
    7. \-rtext:::plot.rtext(dings)
    8.   +-base::subset(x$text_get_lines(), lines)
    9.   \-x$text_get_lines()
   10.     +-stringb::text_tokenize(tmp_text, "\n")
   11.     \-stringb:::text_tokenize.default(tmp_text, "\n")
   12.       \-stringb:::stringb_arrange(token, "from", "to")
   13.         +-df[eval(parse(text = order_call)), ]
   14.         +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   15.         +-base::eval(parse(text = order_call))
   16.         | \-base::eval(parse(text = order_call))
   17.         \-base::order(df["from"], df["to"])
   18.           \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   19.             \-base:::FUN(X[[i]], ...)
   20.               +-base::as.vector(xtfrm(x))
   21.               +-base::xtfrm(x)
   22.               \-base::xtfrm.default(x)
  
  -- FAILURE (test_tools.R:19:3): tools plot.rtext -------------------------------
  `{ ... }` threw an error.
  Message: cannot xtfrm 'x'
  Class:   simpleError/error/condition
  Backtrace:
       x
    1. +-testthat::expect_error(...) test_tools.R:19:2
    2. | \-testthat:::quasi_capture(...)
    3. |   +-testthat:::.capture(...)
    4. |   | \-base::withCallingHandlers(...)
    5. |   \-rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. +-dings$char_data_set_regex("digger", "\\w+", TRUE) test_tools.R:22:4
    7. | \-self$char_data_set(x = x, i = found_is, val = val, hl = hl)
    8. |   \-rbind_fill(private$char_data[[x]], add_df) %>% dp_arrange("i")
    9. \-rtext:::dp_arrange(., "i")
   10.   +-df[eval(parse(text = order_call)), ]
   11.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   12.   +-base::eval(parse(text = order_call))
   13.   | \-base::eval(parse(text = order_call))
   14.   \-base::order(df["i"])
   15.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   16.       \-base:::FUN(X[[i]], ...)
   17.         +-base::as.vector(xtfrm(x))
   18.         +-base::xtfrm(x)
   19.         \-base::xtfrm.default(x)
  
  -- ERROR (test_tools.R:41:3): tools tokenize text ------------------------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_true(...) test_tools.R:41:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. +-rtext:::dim1(text_tokenize(dings, "")) test_tools.R:42:4
    5. | \-base::ifelse(is.null(dim(x)[1]), length(x), dim(x)[1])
    6. +-stringb::text_tokenize(dings, "")
    7. +-rtext:::text_tokenize.rtext(dings, "")
    8. | \-`%>%`(...)
    9. +-rtext:::dp_arrange(., "from", "to")
   10. +-stringb::text_tokenize(...)
   11. \-stringb:::text_tokenize.default(...)
   12.   \-stringb:::stringb_arrange(token, "from", "to")
   13.     +-df[eval(parse(text = order_call)), ]
   14.     +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
   15.     +-base::eval(parse(text = order_call))
   16.     | \-base::eval(parse(text = order_call))
   17.     \-base::order(df["from"], df["to"])
   18.       \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   19.         \-base:::FUN(X[[i]], ...)
   20.           +-base::as.vector(xtfrm(x))
   21.           +-base::xtfrm(x)
   22.           \-base::xtfrm.default(x)
  
  -- ERROR (test_tools.R:81:3): dp_arrange works ---------------------------------
  Error: cannot xtfrm 'x'
  Backtrace:
       x
    1. +-testthat::expect_identical(...) test_tools.R:81:2
    2. | \-testthat::quasi_label(enquo(object), label, arg = "object")
    3. |   \-rlang::eval_bare(expr, quo_get_env(quo))
    4. \-rtext:::dp_arrange(data.frame(i = 10:9), i) test_tools.R:82:4
    5.   +-df[eval(parse(text = order_call)), ]
    6.   +-base::`[.data.frame`(df, eval(parse(text = order_call)), )
    7.   +-base::eval(parse(text = order_call))
    8.   | \-base::eval(parse(text = order_call))
    9.   \-base::order(df["i"])
   10.     \-base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   11.       \-base:::FUN(X[[i]], ...)
   12.         +-base::as.vector(xtfrm(x))
   13.         +-base::xtfrm(x)
   14.         \-base::xtfrm.default(x)
  
  == testthat results  ===========================================================
  ERROR (test_rtext.R:40:3): rtext tokenize_data_regex
  ERROR (test_rtext.R:91:3): rtext tokenize_data_words
  ERROR (test_rtext.R:116:3): rtext tokenize_data_lines
  ERROR (test_rtext_base.R:32:3): rtext_base char_data_get() works
  ERROR (test_rtext_base.R:87:3): rtext_base char_data_set() works
  ERROR (test_rtext_base.R:434:3): rtext_base char_data_get() with levels works
  ERROR (test_rtext_base.R:485:3): rtext_base tokenize_data_regex
  ERROR (test_rtext_base.R:529:3): rtext_base text_get_lines() works
  FAILURE (test_rtext_export.R:16:3): rtext_export prepare_save() and execute_load()
  FAILURE (test_tools.R:14:3): tools plot.rtext
  FAILURE (test_tools.R:19:3): tools plot.rtext
  ERROR (test_tools.R:41:3): tools tokenize text
  ERROR (test_tools.R:81:3): dp_arrange works
  
  [ FAIL 13 | WARN 0 | SKIP 0 | PASS 249 ]
  Error: Test failures
  Execution halted