Running ‘testthat.R’ [28s/36s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library("testthat")
  > library("pixiedust")
  Additional documentation is being constructed at https://suchanutter.net/pixiedust/index.html
  > 
  > test_check("pixiedust")
  ── Skip (test-as.data.frame.R:8:5): FR 1: Accepts an object of class `dust` ────
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:18:5): FR 1: Accepts an object of class `dust_list
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:30:5): FR 1: Casts an error when passed an object 
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:40:5): FR 1: Casts an error when passed an object 
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:52:5): FR 2: Accepts a logical indicating if sprin
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:63:5): FR 2: Accepts a logical indicating if sprin
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:75:5): FR 2: Casts error when `sprinkled` is not l
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:86:5): FR 2: Casts error when `sprinkled` is not l
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:100:5): FR 3: Return a data frame object ─────────
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:114:5): FR 3: Return a data frame object when unsp
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:130:5): FR 4: Return a list of data frames (dust_l
  Reason: On CRAN
  
  ── Skip (test-as.data.frame.R:146:5): FR 4: Return a list of data frames when un
  Reason: On CRAN
  
  ── ERROR (test-colors.R:8:5): lowercase color ──────────────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "red")) test-colors.R:8:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "red")
   10. └─pixiedust:::sprinkle.default(x, bg = "red")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-colors.R:15:5): uppercase color ─────────────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "RED")) test-colors.R:15:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "RED")
   10. └─pixiedust:::sprinkle.default(x, bg = "RED")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-colors.R:22:5): mixed-case color ────────────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "ReD")) test-colors.R:22:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "ReD")
   10. └─pixiedust:::sprinkle.default(x, bg = "ReD")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-colors.R:29:5): rgb color ───────────────────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "rgb(255,0,0)")) test-colors.R:29:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "rgb(255,0,0)")
   10. └─pixiedust:::sprinkle.default(x, bg = "rgb(255,0,0)")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-colors.R:36:5): rgba color ──────────────────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "rgba(255,0,0,0)")) test-colors.R:36:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "rgba(255,0,0,0)")
   10. └─pixiedust:::sprinkle.default(x, bg = "rgba(255,0,0,0)")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-colors.R:43:5): rgba color decimal alpha ────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "rgba(255,0,0,.10)")) test-colors.R:43:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "rgba(255,0,0,.10)")
   10. └─pixiedust:::sprinkle.default(x, bg = "rgba(255,0,0,.10)")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-colors.R:50:5): rgba color decimal alpha preceded by 0 ──────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "rgba(255,0,0,0.10)")) test-colors.R:50:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "rgba(255,0,0,0.10)")
   10. └─pixiedust:::sprinkle.default(x, bg = "rgba(255,0,0,0.10)")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-colors.R:57:5): rgba color 1.0 alpha ────────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "rgba(255,0,0,1.0)")) test-colors.R:57:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "rgba(255,0,0,1.0)")
   10. └─pixiedust:::sprinkle.default(x, bg = "rgba(255,0,0,1.0)")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-colors.R:64:5): hexidecimal color ───────────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "#FF0000")) test-colors.R:64:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "#FF0000")
   10. └─pixiedust:::sprinkle.default(x, bg = "#FF0000")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-colors.R:71:5): hexidecimal color with transparency ─────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "#FF0000F0")) test-colors.R:71:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "#FF0000F0")
   10. └─pixiedust:::sprinkle.default(x, bg = "#FF0000F0")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-colors.R:78:5): transparent color ───────────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(x, bg = "transparent")) test-colors.R:78:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(x, bg = "transparent")
   10. └─pixiedust:::sprinkle.default(x, bg = "transparent")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-index_to_sprinkle.R:64:5): recycle = columns is correctly transla
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-index_to_sprinkle.R:64:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_bg(...)
   10. └─pixiedust:::sprinkle_bg.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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)
  
  ── Skip (test-is_valid_color.R:8:5): Returns a logical vector correclty identify
  Reason: On CRAN
  
  ── Skip (test-is_valid_color.R:26:5): Returns a logical vector correctly identif
  Reason: On CRAN
  
  ── Skip (test-is_valid_color.R:37:5): Returns a logical vector correclty identif
  Reason: On CRAN
  
  ── Skip (test-is_valid_color.R:57:5): Returns a logical vector correctly identif
  Reason: On CRAN
  
  ── Skip (test-is_valid_color.R:71:5): Returns a logical vector correclty identif
  Reason: On CRAN
  
  ── Skip (test-is_valid_color.R:92:5): Returns a logical vector correctly identif
  Reason: On CRAN
  
  ── Skip (test-is_valid_color.R:104:5): Returns a logical vector correclty identi
  Reason: On CRAN
  
  ── Skip (test-is_valid_color.R:128:5): Returns a logical vector correctly identi
  Reason: On CRAN
  
  ── Skip (test-is_valid_color.R:139:5): Returns a logical vector correctly identi
  Reason: On CRAN
  
  ── Skip (test-is_valid_color.R:152:5): Cast an error if color is not a character
  Reason: On CRAN
  
  ── ERROR (test-medley.R:7:3): medley_bw ────────────────────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(dust(fit) %>% medley_bw() %>% sprinkle_print_method("html")) test-medley.R:7:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─dust(fit) %>% medley_bw() %>% sprinkle_print_method("html")
   10. ├─pixiedust::sprinkle_print_method(., "html")
   11. ├─pixiedust::medley_bw(.)
   12. │ └─`%>%`(...)
   13. ├─pixiedust::sprinkle(...)
   14. ├─pixiedust::sprinkle(., rows = 1, border = "top", part = "body")
   15. ├─pixiedust::sprinkle(., rows = 1, border = "top", part = "head")
   16. └─pixiedust:::sprinkle.default(., rows = 1, border = "top", part = "head")
   17.   └─pixiedust:::index_to_sprinkle(...)
   18.     ├─indices[order(indices[recycle_arrange]), ]
   19.     ├─base::`[.data.frame`(...)
   20.     └─base::order(indices[recycle_arrange])
   21.       └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   22.         └─base:::FUN(X[[i]], ...)
   23.           ├─base::as.vector(xtfrm(x))
   24.           ├─base::xtfrm(x)
   25.           └─base::xtfrm.default(x)
  
  ── ERROR (test-medley.R:17:3): medley_model ────────────────────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-medley.R:17:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─dust(fit, glance_foot = TRUE) %>% medley_model() %>% sprinkle_print_method("html")
   10. ├─pixiedust::sprinkle_print_method(., "html")
   11. ├─pixiedust::medley_model(.)
   12. │ └─`%>%`(...)
   13. ├─pixiedust::sprinkle(., cols = "p.value", fn = quote(pvalString(value)))
   14. ├─pixiedust::sprinkle(., cols = not_pval, round = round, part = "body")
   15. ├─pixiedust::sprinkle(...)
   16. ├─pixiedust::sprinkle(., rows = 1, border = "top", part = "body")
   17. ├─pixiedust::sprinkle(., rows = 1, border = "top", part = "head")
   18. └─pixiedust:::sprinkle.default(., rows = 1, border = "top", part = "head")
   19.   └─pixiedust:::index_to_sprinkle(...)
   20.     ├─indices[order(indices[recycle_arrange]), ]
   21.     ├─base::`[.data.frame`(...)
   22.     └─base::order(indices[recycle_arrange])
   23.       └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   24.         └─base:::FUN(X[[i]], ...)
   25.           ├─base::as.vector(xtfrm(x))
   26.           ├─base::xtfrm(x)
   27.           └─base::xtfrm.default(x)
  
  ── ERROR (test-medley_all_borders.R:7:3): medley_all_borders with defaults ─────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(dust(fit) %>% medley_all_borders()) test-medley_all_borders.R:7:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─dust(fit) %>% medley_all_borders()
   10. └─pixiedust::medley_all_borders(.)
   11.   ├─pixiedust::sprinkle(...)
   12.   └─pixiedust:::sprinkle.default(...)
   13.     └─pixiedust:::index_to_sprinkle(...)
   14.       ├─indices[order(indices[recycle_arrange]), ]
   15.       ├─base::`[.data.frame`(...)
   16.       └─base::order(indices[recycle_arrange])
   17.         └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   18.           └─base:::FUN(X[[i]], ...)
   19.             ├─base::as.vector(xtfrm(x))
   20.             ├─base::xtfrm(x)
   21.             └─base::xtfrm.default(x)
  
  ── ERROR (test-medley_all_borders.R:15:3): medley_all_borders with horizontal = 
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-medley_all_borders.R:15:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─dust(fit) %>% medley_all_borders(rows = 2, cols = 3, horizontal = FALSE)
   10. └─pixiedust::medley_all_borders(., rows = 2, cols = 3, horizontal = FALSE)
   11.   ├─pixiedust::sprinkle(...)
   12.   └─pixiedust:::sprinkle.default(...)
   13.     └─pixiedust:::index_to_sprinkle(...)
   14.       ├─indices[order(indices[recycle_arrange]), ]
   15.       ├─base::`[.data.frame`(...)
   16.       └─base::order(indices[recycle_arrange])
   17.         └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   18.           └─base:::FUN(X[[i]], ...)
   19.             ├─base::as.vector(xtfrm(x))
   20.             ├─base::xtfrm(x)
   21.             └─base::xtfrm.default(x)
  
  ── ERROR (test-medley_all_borders.R:25:3): medley_all_borders with vertical = FA
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-medley_all_borders.R:25:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_print_method(., "html")
   11. └─pixiedust::medley_all_borders(., rows = 2:4, cols = 3:5, vertical = FALSE)
   12.   ├─pixiedust::sprinkle(...)
   13.   └─pixiedust:::sprinkle.default(...)
   14.     └─pixiedust:::index_to_sprinkle(...)
   15.       ├─indices[order(indices[recycle_arrange]), ]
   16.       ├─base::`[.data.frame`(...)
   17.       └─base::order(indices[recycle_arrange])
   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-medley_all_borders.R:37:5): medley_all_borders with part = 'table
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-medley_all_borders.R:37:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─dust(fit) %>% medley_all_borders(part = "table") %>% sprinkle_print_method("html")
   10. ├─pixiedust::sprinkle_print_method(., "html")
   11. └─pixiedust::medley_all_borders(., part = "table")
   12.   ├─pixiedust::sprinkle(...)
   13.   └─pixiedust:::sprinkle.default(...)
   14.     └─pixiedust:::index_to_sprinkle(...)
   15.       ├─indices[order(indices[recycle_arrange]), ]
   16.       ├─base::`[.data.frame`(...)
   17.       └─base::order(indices[recycle_arrange])
   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-perform_function.R:6:3): Apply a calculation ────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─`%>%`(...) test-perform_function.R:6:2
    2. ├─pixiedust::sprinkle(...)
    3. └─pixiedust:::sprinkle.default(...)
    4.   └─pixiedust:::index_to_sprinkle(...)
    5.     ├─indices[order(indices[recycle_arrange]), ]
    6.     ├─base::`[.data.frame`(...)
    7.     └─base::order(indices[recycle_arrange])
    8.       └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
    9.         └─base:::FUN(X[[i]], ...)
   10.           ├─base::as.vector(xtfrm(x))
   11.           ├─base::xtfrm(x)
   12.           └─base::xtfrm.default(x)
  
  ── ERROR (test-perform_function.R:18:3): Apply a string manipulation ───────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─`%>%`(...) test-perform_function.R:18:2
    2. ├─pixiedust::sprinkle(...)
    3. └─pixiedust:::sprinkle.default(...)
    4.   └─pixiedust:::index_to_sprinkle(...)
    5.     ├─indices[order(indices[recycle_arrange]), ]
    6.     ├─base::`[.data.frame`(...)
    7.     └─base::order(indices[recycle_arrange])
    8.       └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
    9.         └─base:::FUN(X[[i]], ...)
   10.           ├─base::as.vector(xtfrm(x))
   11.           ├─base::xtfrm(x)
   12.           └─base::xtfrm.default(x)
  
  ── ERROR (test-pixieply.R:5:3): apply medley to dust_list ──────────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-pixieply.R:5:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. └─pixiedust::pixieply(...)
   10.   ├─base::structure(lapply(X = X, FUN = FUN, ...), class = "dust_list")
   11.   └─base::lapply(X = X, FUN = FUN, ...)
   12.     └─pixiedust:::FUN(X[[i]], ...)
   13.       ├─pixiedust::sprinkle(...)
   14.       └─pixiedust:::sprinkle.default(...)
   15.         └─pixiedust:::index_to_sprinkle(...)
   16.           ├─indices[order(indices[recycle_arrange]), ]
   17.           ├─base::`[.data.frame`(...)
   18.           └─base::order(indices[recycle_arrange])
   19.             └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.               └─base:::FUN(X[[i]], ...)
   21.                 ├─base::as.vector(xtfrm(x))
   22.                 ├─base::xtfrm(x)
   23.                 └─base::xtfrm.default(x)
  
  ── ERROR (test-pixieply.R:19:5): apply unique captions to dust_list ────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─`%>%`(...) test-pixieply.R:19:4
    2. ├─testthat::expect_silent(.)
    3. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    4. │   ├─testthat:::.capture(...)
    5. │   │ ├─withr::with_output_sink(...)
    6. │   │ │ └─base::force(code)
    7. │   │ ├─base::withCallingHandlers(...)
    8. │   │ └─base::withVisible(code)
    9. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
   10. └─pixiedust::pixiemap(...)
   11.   ├─base::structure(...)
   12.   └─base::mapply(...)
   13.     ├─(function (x, rows = NULL, cols = NULL, ..., part = c("body", ...
   14.     └─pixiedust:::sprinkle.default(dots[[1L]][[1L]], caption = dots[[2L]][[1L]])
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-print.dust.R:14:3): printing to console succeeds with sprinkles ─
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─`%>%`(...) test-print.dust.R:14:2
    2. ├─pixiedust::sprinkle(...)
    3. └─pixiedust:::sprinkle.default(...)
    4.   └─pixiedust:::index_to_sprinkle(...)
    5.     ├─indices[order(indices[recycle_arrange]), ]
    6.     ├─base::`[.data.frame`(...)
    7.     └─base::order(indices[recycle_arrange])
    8.       └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
    9.         └─base:::FUN(X[[i]], ...)
   10.           ├─base::as.vector(xtfrm(x))
   11.           ├─base::xtfrm(x)
   12.           └─base::xtfrm.default(x)
  
  ── ERROR (test-print.dust.R:46:3): printing to console succeeds with sprinkles ─
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─`%>%`(...) test-print.dust.R:46:2
    2. ├─pixiedust::sprinkle_print_method(., "markdown")
    3. ├─pixiedust::sprinkle(...)
    4. └─pixiedust:::sprinkle.default(...)
    5.   └─pixiedust:::index_to_sprinkle(...)
    6.     ├─indices[order(indices[recycle_arrange]), ]
    7.     ├─base::`[.data.frame`(...)
    8.     └─base::order(indices[recycle_arrange])
    9.       └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   10.         └─base:::FUN(X[[i]], ...)
   11.           ├─base::as.vector(xtfrm(x))
   12.           ├─base::xtfrm(x)
   13.           └─base::xtfrm.default(x)
  
  ── ERROR (test-print.dust.R:79:3): printing to console succeeds with sprinkles ─
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─`%>%`(...) test-print.dust.R:79:2
    2. ├─pixiedust::sprinkle_print_method(., "html")
    3. ├─pixiedust::sprinkle(...)
    4. └─pixiedust:::sprinkle.default(...)
    5.   └─pixiedust:::index_to_sprinkle(...)
    6.     ├─indices[order(indices[recycle_arrange]), ]
    7.     ├─base::`[.data.frame`(...)
    8.     └─base::order(indices[recycle_arrange])
    9.       └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   10.         └─base:::FUN(X[[i]], ...)
   11.           ├─base::as.vector(xtfrm(x))
   12.           ├─base::xtfrm(x)
   13.           └─base::xtfrm.default(x)
  
  ── Skip (test-print_dust_html.R:6:5): print_dust_html with fixed header ────────
  Reason: On CRAN
  
  ── Skip (test-print_dust_html.R:17:5): print_dust_html with interactive = FALSE 
  Reason: On CRAN
  
  ── Skip (test-print_dust_html.R:28:5): print_dust_html with interactive = FALSE,
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:6:5): print_dust_latex ────────────────────────
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:41:5): print_dust_latex with a label ──────────
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:53:5): print_dust_latex with bookdown and no la
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:65:5): print_dust_latex with bookdown and a lab
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:78:5): print_dust_latex with longtable ────────
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:90:5): print_dust_latex with float = FALSE ────
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:102:5): print_dust_latex with HTML colors ─────
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:115:5): print_dust_latex with rgb color ───────
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:129:5): print_dust_latex with vertical dashed b
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:144:5): print_dust_latex with horizontal border
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:157:5): print_dust_latex with horizontal border
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex.R:171:5): print_dust_latex sanitization ─────────
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex_hhline.R:6:5): print_dust_latex_hhline ──────────
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex_hhline.R:42:5): print_dust_latex_hhline with a la
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex_hhline.R:55:5): print_dust_latex_hhline with book
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex_hhline.R:68:5): print_dust_latex_hhline with book
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex_hhline.R:82:5): print_dust_latex_hhline with long
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex_hhline.R:95:5): print_dust_latex_hhline with floa
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex_hhline.R:108:5): print_dust_latex with hhline and
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex_hhline.R:122:5): print_dust_latex with hhline and
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex_hhline.R:137:5): print_dust_latex with hhline and
  Reason: On CRAN
  
  ── Skip (test-print_dust_latex_hhline.R:152:5): print_dust_latex with hhline and
  Reason: On CRAN
  
  ── Skip (test-print_dust_methods.R:5:3): print_dust_console ────────────────────
  Reason: On CRAN
  
  ── Skip (test-print_dust_methods.R:38:3): print_dust_html ──────────────────────
  Reason: On CRAN
  
  ── Skip (test-print_dust_methods.R:72:3): print_dust_html: correction for multip
  Reason: On CRAN
  
  ── Skip (test-print_dust_methods.R:103:3): print_dust_markdown ─────────────────
  Reason: On CRAN
  
  ── Skip (test-print_dust_methods.R:138:13): print_dust_latex ───────────────────
  Reason: On CRAN
  
  ── Skip (test-print_dust_methods.R:173:5): missing values in LaTeX output - sani
  Reason: On CRAN
  
  ── Skip (test-print_dust_methods.R:188:5): print_dust_latex does not output inva
  Reason: On CRAN
  
  ── Skip (test-print_dust_methods.R:198:5): html tables with bookdown label ─────
  Reason: On CRAN
  
  ── ERROR (test-sprinkle_align.R:12:5): Correctly reassigns the appropriate eleme
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_align.R:12:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_align(x, rows = 1, halign = "left")
    5. └─pixiedust:::sprinkle_align.default(x, rows = 1, halign = "left")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_align.R:24:5): Correctly reassigns the appropriate eleme
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_align.R:24:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_align(x, rows = 2, cols = 4:5, halign = "center")
    5. └─pixiedust:::sprinkle_align.default(x, rows = 2, cols = 4:5, halign = "center")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_align.R:49:5): Correctly reassigns the appropriate eleme
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_align.R:49:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_align(x, rows = 1, valign = "top")
    5. └─pixiedust:::sprinkle_align.default(x, rows = 1, valign = "top")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_align.R:61:5): Correctly reassigns the appropriate eleme
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_align.R:61:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_align(x, rows = 2, cols = 4:5, valign = "middle")
    5. └─pixiedust:::sprinkle_align.default(x, rows = 2, cols = 4:5, valign = "middle")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_align.R:84:5): Correctly skips reassignment when valign 
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_align.R:84:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_align(x, valign = NULL, halign = NULL)
    5. └─pixiedust:::sprinkle_align.default(x, valign = NULL, halign = NULL)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_align.R:94:5): Function succeeds when called on a dust_l
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_align.R:94:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_align(., halign = "left")
   11. └─pixiedust:::sprinkle_align.dust_list(., halign = "left")
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_align.R:177:5): Passes if recycle != 'none' and halign d
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_align.R:177:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_align(x, halign = c("left", "right"), recycle = "rows")
   10. └─pixiedust:::sprinkle_align.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_align.R:198:5): Passes if recycle != 'none' and halign d
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_align.R:198:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_align(x, valign = c("bottom", "top"), recycle = "rows")
   10. └─pixiedust:::sprinkle_align.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_bg.R:12:5): Correctly reassigns the appropriate elements
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_bg.R:12:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_bg(x, rows = 1, bg = "red")
    5. └─pixiedust:::sprinkle_bg.default(x, rows = 1, bg = "red")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_bg.R:24:5): Correctly reassigns the appropriate elements
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_bg.R:24:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_bg(x, rows = 2, cols = 4:5, bg = "blue")
    5. └─pixiedust:::sprinkle_bg.default(x, rows = 2, cols = 4:5, bg = "blue")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_bg.R:47:5): Function succeeds when called on a dust_list
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_bg.R:47:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_bg(., rows = 2, bg = "transparent")
   11. └─pixiedust:::sprinkle_bg.dust_list(., rows = 2, bg = "transparent")
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_bg.R:133:5): Passes when recycle != 'none' and bg does h
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_bg.R:133:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_bg(x, bg = c("red", "blue"), recycle = "rows")
   10. └─pixiedust:::sprinkle_bg.default(x, bg = c("red", "blue"), recycle = "rows")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_bg_pattern.R:11:5): Correctly reassigns the appropriate 
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_bg_pattern.R:11:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_bg_pattern(...)
    5. └─pixiedust:::sprinkle_bg_pattern.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_bg_pattern.R:23:5): Correctly reassigns the appropriate 
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_bg_pattern.R:23:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_bg_pattern(...)
    5. └─pixiedust:::sprinkle_bg_pattern.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_bg_pattern.R:36:5): Correctly reassigns the appropriate 
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_bg_pattern.R:36:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_bg_pattern(...)
    5. └─pixiedust:::sprinkle_bg_pattern.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_bg_pattern.R:49:5): Function succeeds when called on a d
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_bg_pattern.R:49:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_bg_pattern(., bg_pattern = c("white", "black"))
   11. └─pixiedust:::sprinkle_bg_pattern.dust_list(...)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_border.R:11:5): Correctly reassigns the left_border, rig
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_border.R:11:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_border(x, border = "all", border_color = "green")
    5. └─pixiedust:::sprinkle_border.default(x, border = "all", border_color = "green")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_border.R:27:5): Correctly reassigns the left_border, rig
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_border.R:27:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_border(x, border = "bottom", color = "black")
    5. └─pixiedust:::sprinkle_border.default(x, border = "bottom", color = "black")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_border.R:38:5): Correctly reassigns the left_border, rig
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_border.R:38:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_border(x, border = "left", color = "black")
    5. └─pixiedust:::sprinkle_border.default(x, border = "left", color = "black")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_border.R:49:5): Correctly reassigns the left_border, rig
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_border.R:49:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_border(x, border = "top", color = "black")
    5. └─pixiedust:::sprinkle_border.default(x, border = "top", color = "black")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_border.R:60:5): Correctly reassigns the left_border, rig
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_border.R:60:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_border(x, border = "right", color = "black")
    5. └─pixiedust:::sprinkle_border.default(x, border = "right", color = "black")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_border.R:70:5): Function succeeds when called on a dust_
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_border.R:70:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_border(., border = "right", color = "red")
   11. └─pixiedust:::sprinkle_border.dust_list(., border = "right", color = "red")
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_border.R:148:5): Accept solid, dashed, dotted, double, g
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_style = "solid")) test-sprinkle_border.R:148:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_style = "solid")
   10. └─pixiedust:::sprinkle_border.default(x, border_style = "solid")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:158:5): Accept solid, dashed, dotted, double, g
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_style = "dashed")) test-sprinkle_border.R:158:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_style = "dashed")
   10. └─pixiedust:::sprinkle_border.default(x, border_style = "dashed")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:168:5): Accept solid, dashed, dotted, double, g
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_style = "dotted")) test-sprinkle_border.R:168:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_style = "dotted")
   10. └─pixiedust:::sprinkle_border.default(x, border_style = "dotted")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:179:5): Accept solid, dashed, dotted, double, g
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_style = "double")) test-sprinkle_border.R:179:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_style = "double")
   10. └─pixiedust:::sprinkle_border.default(x, border_style = "double")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:189:5): Accept solid, dashed, dotted, double, g
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_style = "groove")) test-sprinkle_border.R:189:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_style = "groove")
   10. └─pixiedust:::sprinkle_border.default(x, border_style = "groove")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:199:5): Accept solid, dashed, dotted, double, g
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_style = "ridge")) test-sprinkle_border.R:199:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_style = "ridge")
   10. └─pixiedust:::sprinkle_border.default(x, border_style = "ridge")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:209:5): Accept solid, dashed, dotted, double, g
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_style = "inset")) test-sprinkle_border.R:209:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_style = "inset")
   10. └─pixiedust:::sprinkle_border.default(x, border_style = "inset")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:219:5): Accept solid, dashed, dotted, double, g
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_style = "outset")) test-sprinkle_border.R:219:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_style = "outset")
   10. └─pixiedust:::sprinkle_border.default(x, border_style = "outset")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:229:5): Accept solid, dashed, dotted, double, g
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_style = "hidden")) test-sprinkle_border.R:229:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_style = "hidden")
   10. └─pixiedust:::sprinkle_border.default(x, border_style = "hidden")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:239:5): Accept solid, dashed, dotted, double, g
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_style = "none")) test-sprinkle_border.R:239:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_style = "none")
   10. └─pixiedust:::sprinkle_border.default(x, border_style = "none")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:279:5): border_units accepts pt ───────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_units = "pt")) test-sprinkle_border.R:279:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_units = "pt")
   10. └─pixiedust:::sprinkle_border.default(x, border_units = "pt")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:288:5): border_units accepts px ───────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_border(x, border_units = "px")) test-sprinkle_border.R:288:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_units = "px")
   10. └─pixiedust:::sprinkle_border.default(x, border_units = "px")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:310:5): Passes when recycle != 'none' and borde
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_border.R:310:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(...)
   10. └─pixiedust:::sprinkle_border.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:326:5): Passes when recycle != 'none' and borde
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_border.R:326:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(...)
   10. └─pixiedust:::sprinkle_border.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:342:5): Passes when recycle != 'none' and borde
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_border.R:342:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_thickness = c(1, 3), recycle = "rows")
   10. └─pixiedust:::sprinkle_border.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_border.R:351:5): Quietly restrict border_units to just t
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_border.R:351:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_border(x, border_units = c("px", "pt"), recycle = "none")
   10. └─pixiedust:::sprinkle_border.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_discrete.R:10:5): Correctly reassigns `bg` ─────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_discrete.R:10:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_discrete(...)
    5. └─pixiedust:::sprinkle_discrete.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_discrete.R:24:5): Correctly reassigns `font_color` ─────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_discrete.R:24:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_discrete(...)
    5. └─pixiedust:::sprinkle_discrete.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_discrete.R:38:5): Correctly reassigns `font_color` ─────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_discrete.R:38:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_discrete(...)
    5. └─pixiedust:::sprinkle_discrete.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_discrete.R:52:5): Selects default colors when discrete_c
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_discrete(x, cols = "gear", discrete = "bg")) test-sprinkle_discrete.R:52:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_discrete(x, cols = "gear", discrete = "bg")
   10. └─pixiedust:::sprinkle_discrete.default(x, cols = "gear", discrete = "bg")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_discrete.R:61:5): Correctly reassigns `border` ─────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_discrete.R:61:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_discrete(...)
    5. └─pixiedust:::sprinkle_discrete.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_discrete.R:75:5): Correctly reassigns `border` ─────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_discrete.R:75:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_discrete(...)
    5. └─pixiedust:::sprinkle_discrete.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_discrete.R:89:5): Function succeeds when called on a dus
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_discrete.R:89:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_discrete(...)
   11. └─pixiedust:::sprinkle_discrete.dust_list(...)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_dust_list.R:9:3): sprinkle_table on a dust_list ────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_table(dlist, longtable = TRUE)) test-sprinkle_dust_list.R:9:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_table(dlist, longtable = TRUE)
   10. └─pixiedust:::sprinkle_table.dust_list(dlist, longtable = TRUE)
   11.   ├─base::structure(...)
   12.   └─base::lapply(...)
   13.     ├─pixiedust:::FUN(X[[i]], ...)
   14.     └─pixiedust:::sprinkle_table.default(X[[i]], ...)
   15.       ├─pixiedust::sprinkle(x, cols = cols, ..., part = "body")
   16.       └─pixiedust:::sprinkle.default(x, cols = cols, ..., part = "body")
   17.         └─pixiedust:::index_to_sprinkle(...)
   18.           ├─indices[order(indices[recycle_arrange]), ]
   19.           ├─base::`[.data.frame`(...)
   20.           └─base::order(indices[recycle_arrange])
   21.             └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   22.               └─base:::FUN(X[[i]], ...)
   23.                 ├─base::as.vector(xtfrm(x))
   24.                 ├─base::xtfrm(x)
   25.                 └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_dust_list.R:30:3): sprinkle a dust_list ────────────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle(dlist, rows = 3, cols = 2, italic = TRUE)) test-sprinkle_dust_list.R:30:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle(dlist, rows = 3, cols = 2, italic = TRUE)
   10. └─pixiedust:::sprinkle.dust_list(dlist, rows = 3, cols = 2, italic = TRUE)
   11.   ├─base::structure(...)
   12.   └─base::lapply(...)
   13.     ├─pixiedust:::FUN(X[[i]], ...)
   14.     └─pixiedust:::sprinkle.default(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_fn.R:10:5): Correctly reassigns the appropriate elements
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_fn.R:10:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_fn(x, rows = 1, fn = quote(identity(value)))
    5. └─pixiedust:::sprinkle_fn.default(x, rows = 1, fn = quote(identity(value)))
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_fn.R:22:5): Correctly reassigns the appropriate elements
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_fn.R:22:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_fn(x, rows = 2, cols = 4:5, fn = quote(identity(value)))
    5. └─pixiedust:::sprinkle_fn.default(x, rows = 2, cols = 4:5, fn = quote(identity(value)))
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_fn.R:45:5): Function succeeds when called on a dust_list
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_fn.R:45:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_fn(., cols = "mpg", fn = quote(median(value)))
   11. └─pixiedust:::sprinkle_fn.dust_list(., cols = "mpg", fn = quote(median(value)))
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_font.R:10:5): Correctly change the bold column of the ta
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_font.R:10:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_font(x = x, bold = TRUE)
    5. └─pixiedust:::sprinkle_font.default(x = x, bold = TRUE)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_font.R:21:5): Succeeds when called on a dust_list object
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_font.R:21:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_font(., cols = "mpg", bold = TRUE)
   11. └─pixiedust:::sprinkle_font.dust_list(., cols = "mpg", bold = TRUE)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_font.R:36:5): Correctly change the italic column of the 
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_font.R:36:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_font(x = x, italic = TRUE)
    5. └─pixiedust:::sprinkle_font.default(x = x, italic = TRUE)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_font.R:49:5): Correctly change the font_size column of t
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_font.R:49:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_font(x = x, font_size = 10)
    5. └─pixiedust:::sprinkle_font.default(x = x, font_size = 10)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_font.R:62:5): Correctly change the font_size_units colum
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_font.R:62:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_font(x = x, font_size_units = "em")
    5. └─pixiedust:::sprinkle_font.default(x = x, font_size_units = "em")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_font.R:75:5): Correctly change the font_color column of 
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_font.R:75:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_font(x = x, font_color = "blue")
    5. └─pixiedust:::sprinkle_font.default(x = x, font_color = "blue")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_font.R:88:5): Correctly change the font_family column of
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_font.R:88:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_font(x = x, font_family = "Courier New")
    5. └─pixiedust:::sprinkle_font.default(x = x, font_family = "Courier New")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_font.R:287:5): Passes when recycle != 'none' and bold do
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_font.R:287:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_font(x, bold = c(TRUE, FALSE), recycle = "rows")
   10. └─pixiedust:::sprinkle_font.default(x, bold = c(TRUE, FALSE), recycle = "rows")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_font.R:303:5): Passes when recycle != 'none' and italic 
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_font.R:303:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_font(x, italic = c(TRUE, FALSE), recycle = "rows")
   10. └─pixiedust:::sprinkle_font.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_font.R:319:5): Passes when recycle != 'none' and font_si
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_font.R:319:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_font(x, font_size = c(10, 12), recycle = "rows")
   10. └─pixiedust:::sprinkle_font.default(x, font_size = c(10, 12), recycle = "rows")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_font.R:335:5): Passes when recycle != 'none' and font_si
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_font.R:335:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_font(...)
   10. └─pixiedust:::sprinkle_font.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_font.R:351:5): Passes when recycle != 'none' and font_co
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_font.R:351:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_font(x, font_color = c("red", "blue"), recycle = "rows")
   10. └─pixiedust:::sprinkle_font.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_font.R:367:5): Passes when recycle != 'none' and font_fa
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_font.R:367:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_font(...)
   10. └─pixiedust:::sprinkle_font.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_gradient.R:20:5): Correctly reassigns the appropriate el
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:20:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "bg")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "bg")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:34:5): Correctly reassigns the appropriate el
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:34:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "border")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "border")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:47:5): Correctly reassigns the appropriate el
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:47:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "border")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "border")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:60:5): Correctly reassigns the appropriate el
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:60:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "border")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "border")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:73:5): Correctly reassigns the appropriate el
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:73:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "border")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "border")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:86:5): Correctly reassigns the appropriate el
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:86:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "bottom_border")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "bottom_border")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:99:5): Correctly reassigns the appropriate el
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:99:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "left_border")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "left_border")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:112:5): Correctly reassigns the appropriate e
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:112:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "top_border")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "top_border")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:125:5): Correctly reassigns the appropriate e
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:125:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "right_border")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "right_border")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:138:5): Correctly reassigns the appropriate e
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:138:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "font")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "font")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:151:5): Correctly reassigns the appropriate e
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:151:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(x, cols = "mpg", gradient = "font_color")
    5. └─pixiedust:::sprinkle_gradient.default(x, cols = "mpg", gradient = "font_color")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:164:5): Correctly reassigns the appropriate e
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:164:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(...)
    5. └─pixiedust:::sprinkle_gradient.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:178:5): Correctly reassigns the default color
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:178:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(...) test-sprinkle_gradient.R:181:7
    5. └─pixiedust:::sprinkle_gradient.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:191:5): Correctly reassigns the color for cus
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_gradient.R:191:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_gradient(...)
    5. └─pixiedust:::sprinkle_gradient.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_gradient.R:204:5): sprinkle_gradient succeeds on dust_li
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_gradient.R:204:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_gradient(., gradient = "bg", gradient_n = 5)
   11. └─pixiedust:::sprinkle_gradient.dust_list(., gradient = "bg", gradient_n = 5)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_height.R:11:5): Correctly reassigns the appropriate elem
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_height.R:11:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_height(x, cols = 2, height = 20)
    5. └─pixiedust:::sprinkle_height.default(x, cols = 2, height = 20)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_height.R:22:5): Correctly reassigns the appropriate elem
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_height.R:22:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_height(x, cols = 2, height_units = "%")
    5. └─pixiedust:::sprinkle_height.default(x, cols = 2, height_units = "%")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_height.R:32:5): Function succeeds when called on a dust_
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_height.R:32:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_height(., height = 10)
   11. └─pixiedust:::sprinkle_height.dust_list(., height = 10)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_height.R:129:5): Passes when recycle != 'none' and heigh
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_height.R:129:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_height(x, height = c(10, 15), recycle = "rows")
   10. └─pixiedust:::sprinkle_height.default(x, height = c(10, 15), recycle = "rows")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_height.R:138:5): When recycle = 'none', quietly coerce h
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_height.R:138:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_height(x, height_units = c("px", "pt"))
   10. └─pixiedust:::sprinkle_height.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_merge.R:13:5): Correctly reassigns the appropriate eleme
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_merge.R:13:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_merge(x, rows = 1:2, cols = 1:2, merge = TRUE)
    5. └─pixiedust:::sprinkle_merge.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_merge.R:24:5): Correctly reassigns the appropriate eleme
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_merge.R:24:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_merge(...)
    5. └─pixiedust:::sprinkle_merge.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_merge.R:36:5): Correctly reassigns the appropriate eleme
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_merge.R:36:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_merge(...)
    5. └─pixiedust:::sprinkle_merge.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_merge.R:48:5): Works with a dust_list object ───────────
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_merge.R:48:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_merge(., rows = 1, cols = 1:2, merge = TRUE)
   11. └─pixiedust:::sprinkle_merge.dust_list(...)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_merge.R:60:5): Correctly skips merging when merge = FALS
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_merge.R:60:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_merge(x, rows = 1:2, cols = 1:2, merge = FALSE)
    5. └─pixiedust:::sprinkle_merge.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_na_string.R:12:5): Correctly reassigns the appropriate e
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_na_string.R:12:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_na_string(x, rows = 1, na_string = "red")
    5. └─pixiedust:::sprinkle_na_string.default(x, rows = 1, na_string = "red")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_na_string.R:24:5): Correctly reassigns the appropriate e
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_na_string.R:24:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_na_string(x, rows = 2, cols = 4:5, na_string = "blue")
    5. └─pixiedust:::sprinkle_na_string.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_na_string.R:47:5): Succeeds when called on a dust_list o
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_na_string.R:47:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_na_string(., na_string = "transparent")
   11. └─pixiedust:::sprinkle_na_string.dust_list(., na_string = "transparent")
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_na_string.R:117:5): Passes when recycle != 'none' and na
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_na_string.R:117:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_na_string(...)
   10. └─pixiedust:::sprinkle_na_string.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_pad.R:12:5): Correctly reassigns the appropriate element
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_pad.R:12:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_pad(x, rows = 1, pad = 3)
    5. └─pixiedust:::sprinkle_pad.default(x, rows = 1, pad = 3)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_pad.R:24:5): Correctly reassigns the appropriate element
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_pad.R:24:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_pad(x, rows = 2, cols = 4:5, pad = 2)
    5. └─pixiedust:::sprinkle_pad.default(x, rows = 2, cols = 4:5, pad = 2)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_pad.R:47:5): Function succeeds when called on a dust_lis
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_pad.R:47:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_pad(., pad = 5)
   11. └─pixiedust:::sprinkle_pad.dust_list(., pad = 5)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_pad.R:119:5): Passes when recycle != 'none' and pad does
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_pad(x, pad = 1:3, recycle = "rows")) test-sprinkle_pad.R:119:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_pad(x, pad = 1:3, recycle = "rows")
   10. └─pixiedust:::sprinkle_pad.default(x, pad = 1:3, recycle = "rows")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_replace.R:12:5): Correctly reassigns the appropriate ele
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_replace.R:12:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_replace(x, rows = 1, replace = "red")
    5. └─pixiedust:::sprinkle_replace.default(x, rows = 1, replace = "red")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_replace.R:24:5): Correctly reassigns the appropriate ele
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_replace.R:24:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_replace(x, rows = 2, cols = 4:5, replace = "blue")
    5. └─pixiedust:::sprinkle_replace.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_replace.R:47:5): Function succeeds when called on a dust
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_replace.R:47:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_replace(., rows = 1, cols = 1, replace = "abc")
   11. └─pixiedust:::sprinkle_replace.dust_list(...)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_replace.R:88:5): Casts an warning if the number of indic
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_warning(...) test-sprinkle_replace.R:88:4
    2. │ └─testthat:::quasi_capture(enquo(object), label, capture_warnings)
    3. │   ├─testthat:::.capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─pixiedust::sprinkle_replace(x, rows = 1, cols = 1:4, replace = 1:3)
    7. └─pixiedust:::sprinkle_replace.default(...)
    8.   └─pixiedust:::index_to_sprinkle(...)
    9.     ├─indices[order(indices[recycle_arrange]), ]
   10.     ├─base::`[.data.frame`(...)
   11.     └─base::order(indices[recycle_arrange])
   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-sprinkle_rotate_degree.R:11:5): Correctly reassigns the appropria
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_rotate_degree.R:11:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_rotate_degree(x, cols = 2, rotate_degree = 3)
    5. └─pixiedust:::sprinkle_rotate_degree.default(x, cols = 2, rotate_degree = 3)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_rotate_degree.R:21:5): Succeeds when called on a dust_li
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_rotate_degree.R:21:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_rotate_degree(., rotate_degree = 90)
   11. └─pixiedust:::sprinkle_rotate_degree.dust_list(., rotate_degree = 90)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_rotate_degree.R:102:5): Passes when recycle != 'none' an
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_rotate_degree.R:102:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_rotate_degree(x, rotate_degree = 1:3, recycle = "rows")
   10. └─pixiedust:::sprinkle_rotate_degree.default(...)
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_round.R:11:5): Correctly reassigns the appropriate eleme
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_round.R:11:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_round(x, cols = 2, round = 3)
    5. └─pixiedust:::sprinkle_round.default(x, cols = 2, round = 3)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_round.R:21:5): Succeeds when called on a dust_list objec
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_round.R:21:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_round(., round = 2)
   11. └─pixiedust:::sprinkle_round.dust_list(., round = 2)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_round.R:102:5): Passes when recycle != 'none' and round 
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_round(x, round = 1:3, recycle = "rows")) test-sprinkle_round.R:102:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_round(x, round = 1:3, recycle = "rows")
   10. └─pixiedust:::sprinkle_round.default(x, round = 1:3, recycle = "rows")
   11.   └─pixiedust:::index_to_sprinkle(...)
   12.     ├─indices[order(indices[recycle_arrange]), ]
   13.     ├─base::`[.data.frame`(...)
   14.     └─base::order(indices[recycle_arrange])
   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-sprinkle_sanitize.R:11:5): Correctly reassigns the appropriate el
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_sanitize.R:11:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_sanitize(x, cols = 2, sanitize = TRUE)
    5. └─pixiedust:::sprinkle_sanitize.default(x, cols = 2, sanitize = TRUE)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_sanitize.R:22:5): Correctly reassigns the appropriate el
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_sanitize.R:22:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_sanitize(x, cols = 2, sanitize_args = list(greek = TRUE))
    5. └─pixiedust:::sprinkle_sanitize.default(x, cols = 2, sanitize_args = list(greek = TRUE))
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_sanitize.R:35:5): Function succeeds when called on a dus
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_sanitize.R:35:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_sanitize(., sanitize = TRUE)
   11. └─pixiedust:::sprinkle_sanitize.dust_list(., sanitize = TRUE)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_table.R:6:3): sprinkle_table: apply a sprinkle to all pa
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(sprinkle_table(x, round = 2)) test-sprinkle_table.R:6:2
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─pixiedust::sprinkle_table(x, round = 2)
   10. └─pixiedust:::sprinkle_table.default(x, round = 2)
   11.   ├─pixiedust::sprinkle(x, cols = cols, ..., part = "body")
   12.   └─pixiedust:::sprinkle.default(x, cols = cols, ..., part = "body")
   13.     └─pixiedust:::index_to_sprinkle(...)
   14.       ├─indices[order(indices[recycle_arrange]), ]
   15.       ├─base::`[.data.frame`(...)
   16.       └─base::order(indices[recycle_arrange])
   17.         └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   18.           └─base:::FUN(X[[i]], ...)
   19.             ├─base::as.vector(xtfrm(x))
   20.             ├─base::xtfrm(x)
   21.             └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_width.R:11:5): Correctly reassigns the appropriate eleme
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_width.R:11:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_width(x, cols = 2, width = 20)
    5. └─pixiedust:::sprinkle_width.default(x, cols = 2, width = 20)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_width.R:22:5): Correctly reassigns the appropriate eleme
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_width.R:22:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_width(x, cols = 2, width_units = "%")
    5. └─pixiedust:::sprinkle_width.default(x, cols = 2, width_units = "%")
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_width.R:32:5): Function succeeds when called on a dust_l
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_silent(...) test-sprinkle_width.R:32:4
    2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
    3. │   ├─testthat:::.capture(...)
    4. │   │ ├─withr::with_output_sink(...)
    5. │   │ │ └─base::force(code)
    6. │   │ ├─base::withCallingHandlers(...)
    7. │   │ └─base::withVisible(code)
    8. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    9. ├─`%>%`(...)
   10. ├─pixiedust::sprinkle_width(., cols = "mpg", width = 150, width_units = "pt")
   11. └─pixiedust:::sprinkle_width.dust_list(...)
   12.   ├─base::structure(...)
   13.   └─base::lapply(...)
   14.     └─pixiedust:::FUN(X[[i]], ...)
   15.       └─pixiedust:::index_to_sprinkle(...)
   16.         ├─indices[order(indices[recycle_arrange]), ]
   17.         ├─base::`[.data.frame`(...)
   18.         └─base::order(indices[recycle_arrange])
   19.           └─base::lapply(z, function(x) if (is.object(x)) as.vector(xtfrm(x)) else x)
   20.             └─base:::FUN(X[[i]], ...)
   21.               ├─base::as.vector(xtfrm(x))
   22.               ├─base::xtfrm(x)
   23.               └─base::xtfrm.default(x)
  
  ── ERROR (test-sprinkle_width.R:134:5): Correctly assigns values when recycle is
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_width.R:134:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_width(x, cols = 1:2, width = c(1, 3), recycle = "rows")
    5. └─pixiedust:::sprinkle_width.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_width.R:147:5): Correctly assigns values when recycle is
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_width.R:147:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_width(x, cols = 1:2, width = c(1, 3), recycle = "cols")
    5. └─pixiedust:::sprinkle_width.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── ERROR (test-sprinkle_width.R:162:5): Quietly accepts only the first value in 
  Error: cannot xtfrm 'x'
  Backtrace:
       █
    1. ├─testthat::expect_equal(...) test-sprinkle_width.R:162:4
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─pixiedust::sprinkle_width(...)
    5. └─pixiedust:::sprinkle_width.default(...)
    6.   └─pixiedust:::index_to_sprinkle(...)
    7.     ├─indices[order(indices[recycle_arrange]), ]
    8.     ├─base::`[.data.frame`(...)
    9.     └─base::order(indices[recycle_arrange])
   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)
  
  ── Skip (test-sprinkles.R:8:5): Cast an error if no sprinkles are given ────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:17:5): Cast an error if unnamed sprinkles are given ──
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:26:5): Cast an error if a non-existent sprinkle is giv
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:34:3): sprinkles: bg ─────────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:42:3): sprinkles: bg_pattern ─────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:58:3): sprinkles: bg_pattern_by gives error when inval
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:66:3): sprinkles: bold ───────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:74:3): sprinkles: bold errors ────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:82:3): sprinkles: border_collapse ────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:91:3): sprinkles: border_collapse errors ─────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:99:3): sprinkles: border ─────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:108:3): sprinkles: border errors ─────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:116:3): sprinkles: border_thickness ──────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:125:3): sprinkles: border_thickness errors ───────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:133:3): sprinkles: border_units ──────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:142:3): sprinkles: border_units errors ───────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:150:3): sprinkles: border_style ──────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:159:3): sprinkles: border_style errors ───────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:167:3): sprinkles: border_color ──────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:176:3): sprinkles: border_color errors ───────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:184:3): sprinkles: halign ────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:193:3): sprinkles: halign errors ─────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:201:3): sprinkles: height ────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:209:3): sprinkles: height errors ─────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:217:3): sprinkles: height_units ──────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:226:3): sprinkles: height_units errors ───────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:234:3): sprinkles: fn ────────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:243:3): sprinkles: font_color ────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:252:3): sprinkles: font_color error ──────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:260:3): sprinkles: font_size ─────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:269:3): sprinkles: font_size errors ──────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:277:3): sprinkles: font_size_units ───────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:286:3): sprinkles: font_size_unit errors ─────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:294:3): sprinkles: italic ────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:303:3): sprinkles: italic errors ─────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:311:3): sprinkles: longtable accepts TRUE ────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:319:3): sprinkles: longtable accepts FALSE ───────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:327:3): sprinkles: longtable accepts a number ────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:335:3): sprinkles: longtable- character resolve to FAL
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:342:3): sprinkles: merge ─────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:350:3): sprinkles: merge is not logical ──────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:359:3): sprinkles: merge_rowval without merge casts me
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:368:3): sprinkles: merge_colval without merge casts me
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:377:3): sprinkles: na_string ─────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:385:3): sprinkles: na_string not character ───────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:393:3): sprinkles: pad ───────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:401:3): sprinkles: pad errors ────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:409:3): sprinkles: replace ───────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:417:3): sprinkles: replace errors ────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:426:3): sprinkles: round ─────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:434:3): sprinkles: round errors ──────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:442:3): sprinkles: rotate_degree ─────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:451:3): sprinkles: rotate_degree errors ──────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:459:3): sprinkles: valign ────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:467:3): sprinkles: valign errors ─────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:475:3): sprinkles: width ─────────────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:483:3): sprinkles: width errors ──────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:491:3): sprinkles: width_units ───────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:500:3): sprinkles: width_units errors ────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:508:3): sprinkles: no sprinkles given ────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:516:3): sprinkles: single unnamed sprinkle ───────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:524:3): sprinkles: multiple unnamed sprinkles ────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:532:3): sprinkles: mixture of named and unnamed sprink
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:542:5): sprinkles: fixed argument ────────────────────
  Reason: On CRAN
  
  ── Skip (test-sprinkles.R:556:5): sprinkles: longtable ─────────────────────────
  Reason: On CRAN
  
  ── Skipped tests  ──────────────────────────────────────────────────────────────
  ● On CRAN (120)
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  ERROR (test-colors.R:8:5): lowercase color
  ERROR (test-colors.R:15:5): uppercase color
  ERROR (test-colors.R:22:5): mixed-case color
  ERROR (test-colors.R:29:5): rgb color
  ERROR (test-colors.R:36:5): rgba color
  ERROR (test-colors.R:43:5): rgba color decimal alpha
  ERROR (test-colors.R:50:5): rgba color decimal alpha preceded by 0
  ERROR (test-colors.R:57:5): rgba color 1.0 alpha
  ERROR (test-colors.R:64:5): hexidecimal color
  ERROR (test-colors.R:71:5): hexidecimal color with transparency
  ERROR (test-colors.R:78:5): transparent color
  ERROR (test-index_to_sprinkle.R:64:5): recycle = columns is correctly translated
  ERROR (test-medley.R:7:3): medley_bw
  ERROR (test-medley.R:17:3): medley_model
  ERROR (test-medley_all_borders.R:7:3): medley_all_borders with defaults
  ERROR (test-medley_all_borders.R:15:3): medley_all_borders with horizontal = FALSE
  ERROR (test-medley_all_borders.R:25:3): medley_all_borders with vertical = FALSE
  ERROR (test-medley_all_borders.R:37:5): medley_all_borders with part = 'table'
  ERROR (test-perform_function.R:6:3): Apply a calculation
  ERROR (test-perform_function.R:18:3): Apply a string manipulation
  ERROR (test-pixieply.R:5:3): apply medley to dust_list
  ERROR (test-pixieply.R:19:5): apply unique captions to dust_list
  ERROR (test-print.dust.R:14:3): printing to console succeeds with sprinkles
  ERROR (test-print.dust.R:46:3): printing to console succeeds with sprinkles
  ERROR (test-print.dust.R:79:3): printing to console succeeds with sprinkles
  ERROR (test-sprinkle_align.R:12:5): Correctly reassigns the appropriate elements of the halign column in the table part.
  ERROR (test-sprinkle_align.R:24:5): Correctly reassigns the appropriate elements of the halign column in the table part.
  ERROR (test-sprinkle_align.R:49:5): Correctly reassigns the appropriate elements of the valign column in the table part.
  ERROR (test-sprinkle_align.R:61:5): Correctly reassigns the appropriate elements of the valign column in the table part.
  ERROR (test-sprinkle_align.R:84:5): Correctly skips reassignment when valign = halign = NULL
  ERROR (test-sprinkle_align.R:94:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_align.R:177:5): Passes if recycle != 'none' and halign does not have length 1.
  ERROR (test-sprinkle_align.R:198:5): Passes if recycle != 'none' and halign does not have length 1.
  ERROR (test-sprinkle_bg.R:12:5): Correctly reassigns the appropriate elements bg column in the table part.
  ERROR (test-sprinkle_bg.R:24:5): Correctly reassigns the appropriate elements bg column in the table part.
  ERROR (test-sprinkle_bg.R:47:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_bg.R:133:5): Passes when recycle != 'none' and bg does has length > 1.
  ERROR (test-sprinkle_bg_pattern.R:11:5): Correctly reassigns the appropriate elements of the `bg` columns 
     in the table part
  ERROR (test-sprinkle_bg_pattern.R:23:5): Correctly reassigns the appropriate elements of the `bg` columns 
     in the table part
  ERROR (test-sprinkle_bg_pattern.R:36:5): Correctly reassigns the appropriate elements of the `bg` columns 
    in the table part
  ERROR (test-sprinkle_bg_pattern.R:49:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_border.R:11:5): Correctly reassigns the left_border, right_border, top_border, and 
     bottom_border columns in the table part
  ERROR (test-sprinkle_border.R:27:5): Correctly reassigns the left_border, right_border, top_border, and 
     bottom_border columns in the table part
  ERROR (test-sprinkle_border.R:38:5): Correctly reassigns the left_border, right_border, top_border, and 
     bottom_border columns in the table part
  ERROR (test-sprinkle_border.R:49:5): Correctly reassigns the left_border, right_border, top_border, and 
     bottom_border columns in the table part
  ERROR (test-sprinkle_border.R:60:5): Correctly reassigns the left_border, right_border, top_border, and 
     bottom_border columns in the table part
  ERROR (test-sprinkle_border.R:70:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_border.R:148:5): Accept solid, dashed, dotted, double, groove, ridge, inset, outset, hidden
     and none
  ERROR (test-sprinkle_border.R:158:5): Accept solid, dashed, dotted, double, groove, ridge, inset, outset, hidden
     and none
  ERROR (test-sprinkle_border.R:168:5): Accept solid, dashed, dotted, double, groove, ridge, inset, outset, hidden
     and none
  ERROR (test-sprinkle_border.R:179:5): Accept solid, dashed, dotted, double, groove, ridge, inset, outset, hidden
     and none
  ERROR (test-sprinkle_border.R:189:5): Accept solid, dashed, dotted, double, groove, ridge, inset, outset, hidden
     and none
  ERROR (test-sprinkle_border.R:199:5): Accept solid, dashed, dotted, double, groove, ridge, inset, outset, hidden
     and none
  ERROR (test-sprinkle_border.R:209:5): Accept solid, dashed, dotted, double, groove, ridge, inset, outset, hidden
     and none
  ERROR (test-sprinkle_border.R:219:5): Accept solid, dashed, dotted, double, groove, ridge, inset, outset, hidden
     and none
  ERROR (test-sprinkle_border.R:229:5): Accept solid, dashed, dotted, double, groove, ridge, inset, outset, hidden
     and none
  ERROR (test-sprinkle_border.R:239:5): Accept solid, dashed, dotted, double, groove, ridge, inset, outset, hidden
     and none
  ERROR (test-sprinkle_border.R:279:5): border_units accepts pt
  ERROR (test-sprinkle_border.R:288:5): border_units accepts px
  ERROR (test-sprinkle_border.R:310:5): Passes when recycle != 'none' and border_color does has length > 1.
  ERROR (test-sprinkle_border.R:326:5): Passes when recycle != 'none' and border_color does has length > 1.
  ERROR (test-sprinkle_border.R:342:5): Passes when recycle != 'none' and border_thickness does has length > 1.
  ERROR (test-sprinkle_border.R:351:5): Quietly restrict border_units to just the first element if it has length > 1 and recycle = 'none'
  ERROR (test-sprinkle_discrete.R:10:5): Correctly reassigns `bg`
  ERROR (test-sprinkle_discrete.R:24:5): Correctly reassigns `font_color`
  ERROR (test-sprinkle_discrete.R:38:5): Correctly reassigns `font_color`
  ERROR (test-sprinkle_discrete.R:52:5): Selects default colors when discrete_color is NULL
  ERROR (test-sprinkle_discrete.R:61:5): Correctly reassigns `border`
  ERROR (test-sprinkle_discrete.R:75:5): Correctly reassigns `border`
  ERROR (test-sprinkle_discrete.R:89:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_dust_list.R:9:3): sprinkle_table on a dust_list
  ERROR (test-sprinkle_dust_list.R:30:3): sprinkle a dust_list
  ERROR (test-sprinkle_fn.R:10:5): Correctly reassigns the appropriate elements of the fn column in the table part.
  ERROR (test-sprinkle_fn.R:22:5): Correctly reassigns the appropriate elements bg column in the table part.
  ERROR (test-sprinkle_fn.R:45:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_font.R:10:5): Correctly change the bold column of the table part for the selected cells
  ERROR (test-sprinkle_font.R:21:5): Succeeds when called on a dust_list object
  ERROR (test-sprinkle_font.R:36:5): Correctly change the italic column of the table part for the selected cells
  ERROR (test-sprinkle_font.R:49:5): Correctly change the font_size column of the table part for the selected cells
  ERROR (test-sprinkle_font.R:62:5): Correctly change the font_size_units column of the table part for the selected cells
  ERROR (test-sprinkle_font.R:75:5): Correctly change the font_color column of the table part for the selected cells
  ERROR (test-sprinkle_font.R:88:5): Correctly change the font_family column of the table part for the selected cells
  ERROR (test-sprinkle_font.R:287:5): Passes when recycle != 'none' and bold does has length > 1.
  ERROR (test-sprinkle_font.R:303:5): Passes when recycle != 'none' and italic does has length > 1.
  ERROR (test-sprinkle_font.R:319:5): Passes when recycle != 'none' and font_size does has length > 1.
  ERROR (test-sprinkle_font.R:335:5): Passes when recycle != 'none' and font_size_units does has length > 1.
  ERROR (test-sprinkle_font.R:351:5): Passes when recycle != 'none' and font_color does has length > 1.
  ERROR (test-sprinkle_font.R:367:5): Passes when recycle != 'none' and font_family does has length > 1.
  ERROR (test-sprinkle_gradient.R:20:5): Correctly reassigns the appropriate elements of the bg column
  ERROR (test-sprinkle_gradient.R:34:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:47:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:60:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:73:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:86:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:99:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:112:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:125:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:138:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:151:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:164:5): Correctly reassigns the appropriate elements of the border columns
  ERROR (test-sprinkle_gradient.R:178:5): Correctly reassigns the default color for gradient_na = NULL
  ERROR (test-sprinkle_gradient.R:191:5): Correctly reassigns the color for custom cut vector
  ERROR (test-sprinkle_gradient.R:204:5): sprinkle_gradient succeeds on dust_list
  ERROR (test-sprinkle_height.R:11:5): Correctly reassigns the appropriate elements of height and
     height_units columns in the table part
  ERROR (test-sprinkle_height.R:22:5): Correctly reassigns the appropriate elements of height and
     height_units columns in the table part
  ERROR (test-sprinkle_height.R:32:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_height.R:129:5): Passes when recycle != 'none' and height has length > 1.
  ERROR (test-sprinkle_height.R:138:5): When recycle = 'none', quietly coerce height_units to just the first element given.
  ERROR (test-sprinkle_merge.R:13:5): Correctly reassigns the appropriate elements of merge, merge_rowval and 
     merge_colval columns in the table part.
  ERROR (test-sprinkle_merge.R:24:5): Correctly reassigns the appropriate elements of merge, merge_rowval and 
     merge_colval columns in the table part.
  ERROR (test-sprinkle_merge.R:36:5): Correctly reassigns the appropriate elements of merge, merge_rowval and 
     merge_colval columns in the table part.
  ERROR (test-sprinkle_merge.R:48:5): Works with a dust_list object
  ERROR (test-sprinkle_merge.R:60:5): Correctly skips merging when merge = FALSE
  ERROR (test-sprinkle_na_string.R:12:5): Correctly reassigns the appropriate elements of the na_string column in the table part.
  ERROR (test-sprinkle_na_string.R:24:5): Correctly reassigns the appropriate elements bg column in the table part.
  ERROR (test-sprinkle_na_string.R:47:5): Succeeds when called on a dust_list object
  ERROR (test-sprinkle_na_string.R:117:5): Passes when recycle != 'none' and na_string does has length > 1.
  ERROR (test-sprinkle_pad.R:12:5): Correctly reassigns the appropriate elements pad column in the table part.
  ERROR (test-sprinkle_pad.R:24:5): Correctly reassigns the appropriate elements pad column in the table part.
  ERROR (test-sprinkle_pad.R:47:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_pad.R:119:5): Passes when recycle != 'none' and pad does has length > 1.
  ERROR (test-sprinkle_replace.R:12:5): Correctly reassigns the appropriate elements of the replace column in the table part.
  ERROR (test-sprinkle_replace.R:24:5): Correctly reassigns the appropriate elements bg column in the table part.
  ERROR (test-sprinkle_replace.R:47:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_replace.R:88:5): Casts an warning if the number of indices to replace is not a 
     multiple of `replace`` 
  ERROR (test-sprinkle_rotate_degree.R:11:5): Correctly reassigns the appropriate elements of rotate_degree
     columns in the table part
  ERROR (test-sprinkle_rotate_degree.R:21:5): Succeeds when called on a dust_list object
  ERROR (test-sprinkle_rotate_degree.R:102:5): Passes when recycle != 'none' and rotate_degree does has length > 1.
  ERROR (test-sprinkle_round.R:11:5): Correctly reassigns the appropriate elements of round
     columns in the table part
  ERROR (test-sprinkle_round.R:21:5): Succeeds when called on a dust_list object
  ERROR (test-sprinkle_round.R:102:5): Passes when recycle != 'none' and round does has length > 1.
  ERROR (test-sprinkle_sanitize.R:11:5): Correctly reassigns the appropriate elements of sanitize and
    sanitize_args columns in the table part
  ERROR (test-sprinkle_sanitize.R:22:5): Correctly reassigns the appropriate elements of sanitize and
    sanitize_units columns in the table part
  ERROR (test-sprinkle_sanitize.R:35:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_table.R:6:3): sprinkle_table: apply a sprinkle to all parts
  ERROR (test-sprinkle_width.R:11:5): Correctly reassigns the appropriate elements of width and
     width_units columns in the table part
  ERROR (test-sprinkle_width.R:22:5): Correctly reassigns the appropriate elements of width and
     width_units columns in the table part
  ERROR (test-sprinkle_width.R:32:5): Function succeeds when called on a dust_list object
  ERROR (test-sprinkle_width.R:134:5): Correctly assigns values when recycle is not 'none' and multiple values are given.
  ERROR (test-sprinkle_width.R:147:5): Correctly assigns values when recycle is not 'none' and multiple values are given.
  ERROR (test-sprinkle_width.R:162:5): Quietly accepts only the first value in width_units when recycle = 'none'.
  
  [ FAIL 141 | WARN 0 | SKIP 120 | PASS 372 ]
  Error: Test failures
  Execution halted