Running ‘testthat.R’ [41s/45s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(gt)
  
  Attaching package: 'gt'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  > 
  > test_check("gt")
  Starting 2 test processes
  [ FAIL 80 | WARN 0 | SKIP 1 | PASS 553 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On Linux (1)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error ('test-cols_align.R:24:3'): the `cols_align()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% xml2::read_html() at test-cols_align.R:24:2
    2. ├─xml2::read_html(.)
    3. ├─gt:::render_as_html(.)
    4. │ └─gt:::build_data(data = data, context = "html")
    5. │   └─gt:::stop_if_not_gt(data = data)
    6. │     └─gt:::is_gt(data)
    7. ├─gt::cols_align(., align = "left", columns = c(mpg, cyl, drat))
    8. │ └─gt:::stop_if_not_gt(data = data)
    9. │   └─gt:::is_gt(data)
   10. └─gt::gt(mtcars_short)
   11.   └─gt::cols_align(data = data, align = "auto")
   12.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   13.       ├─base::`[[<-`(...)
   14.       └─tibble:::`[[<-.tbl_df`(...)
   15.         └─tibble:::tbl_subassign(...)
   16.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.             ├─base::withCallingHandlers(...)
   18.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-cols_align.R:142:3'): the stub get its alignment set properly with `cols_align()` ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% xml2::read_html() at test-cols_align.R:142:2
    2. ├─xml2::read_html(.)
    3. ├─gt:::render_as_html(.)
    4. │ └─gt:::build_data(data = data, context = "html")
    5. │   └─gt:::stop_if_not_gt(data = data)
    6. │     └─gt:::is_gt(data)
    7. ├─gt::tab_stubhead(., label = "stub")
    8. │ └─gt:::stop_if_not_gt(data = data)
    9. │   └─gt:::is_gt(data)
   10. └─gt::gt(tbl, rowname_col = "stub")
   11.   └─gt:::dt_stub_df_init(...)
   12.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   13.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   14.       └─tibble:::`[<-.tbl_df`(...)
   15.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   16.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.             ├─base::withCallingHandlers(...)
   18.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-cols_label.R:41:3'): the function `cols_label()` works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt(tbl) %>% ... at test-cols_label.R:41:2
    2. ├─gt::cols_label(...)
    3. │ └─gt:::stop_if_not_gt(data = .data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(tbl)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-cols_move.R:17:3'): the `cols_move()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt(mtcars_short) %>% ... at test-cols_move.R:17:2
    2. ├─gt::cols_move(., columns = c(mpg, cyl, disp), after = drat)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(mtcars_short)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-cols_move.R:131:3'): the `cols_move_to_start()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt(mtcars_short) %>% ... at test-cols_move.R:131:2
    2. ├─gt::cols_move_to_start(., columns = c(gear, carb))
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(mtcars_short)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-cols_move.R:203:3'): the `cols_move_to_end()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt(mtcars_short) %>% ... at test-cols_move.R:203:2
    2. ├─gt::cols_move_to_end(., columns = c(gear, carb))
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(mtcars_short)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-cols_width.R:62:3'): The `cols_width()` function stores values correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-cols_width.R:62:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─... %>% dplyr::mutate(column_width = unlist(column_width))
    5. ├─dplyr::mutate(., column_width = unlist(column_width))
    6. ├─dplyr::select(., var, column_width)
    7. ├─gt::cols_width(...)
    8. │ └─gt:::stop_if_not_gt(data = .data)
    9. │   └─gt:::is_gt(data)
   10. └─gt::gt(tbl)
   11.   └─gt::cols_align(data = data, align = "auto")
   12.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   13.       ├─base::`[[<-`(...)
   14.       └─tibble:::`[[<-.tbl_df`(...)
   15.         └─tibble:::tbl_subassign(...)
   16.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.             ├─base::withCallingHandlers(...)
   18.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-cols_width.R:253:3'): the function `cols_width()` works correctly with a simple table ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt(tbl) %>% ... at test-cols_width.R:253:2
    2. ├─gt::cols_width(...)
    3. │ └─gt:::stop_if_not_gt(data = .data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(tbl)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-cols_width.R:608:3'): the function `cols_width()` works correctly with a complex table ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% cols_width(everything() ~ px(100)) at test-cols_width.R:608:2
    2. ├─gt::cols_width(., everything() ~ px(100))
    3. │ └─gt:::stop_if_not_gt(data = .data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(tbl_2, rowname_col = "row", groupname_col = "group")
    6.   └─gt:::dt_stub_df_init(...)
    7.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
    8.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
    9.       └─tibble:::`[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-color_handling.R:493:3'): the `cell_fill()` function accepts colors of various types ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% xml2::read_html() at test-color_handling.R:493:2
    2. ├─xml2::read_html(.)
    3. ├─gt:::render_as_html(.)
    4. │ └─gt:::build_data(data = data, context = "html")
    5. │   └─gt:::stop_if_not_gt(data = data)
    6. │     └─gt:::is_gt(data)
    7. ├─gt::tab_style(., style = cell_fill(color = "tomato"), locations = cells_body(columns = "month"))
    8. │ └─gt:::stop_if_not_gt(data = data)
    9. │   └─gt:::is_gt(data)
   10. └─gt::gt(.)
   11.   └─gt::cols_align(data = data, align = "auto")
   12.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   13.       ├─base::`[[<-`(...)
   14.       └─tibble:::`[[<-.tbl_df`(...)
   15.         └─tibble:::tbl_subassign(...)
   16.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   17.             ├─base::withCallingHandlers(...)
   18.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-conditional_fmt.R:15:1'): (code run outside of `test_that()`) ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-conditional_fmt.R:15:0
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_preview.R:4:3'): the `gt_preview()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-gt_preview.R:4:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─gt_preview(mtcars) %>% class()
    5. └─gt::gt_preview(mtcars)
    6.   └─gt::gt(data, rownames_to_stub = FALSE)
    7.     └─gt:::dt_stub_df_init(...)
    8.       └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
    9.         ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   10.         └─tibble:::`[<-.tbl_df`(...)
   11.           └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   12.             └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   13.               ├─base::withCallingHandlers(...)
   14.               └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-h_md_html.R:1:1'): (code run outside of `test_that()`) ─────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─exibble %>% gt(rowname_col = "row", groupname_col = "group") at test-h_md_html.R:1:0
    2. └─gt::gt(., rowname_col = "row", groupname_col = "group")
    3.   └─gt:::dt_stub_df_init(...)
    4.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
    5.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
    6.       └─tibble:::`[<-.tbl_df`(...)
    7.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-info_tables.R:5:3'): the `info_date_style()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
        ▆
     1. ├─testthat::expect_s3_class(info_date_style(), c("gt_tbl", "data.frame")) at test-info_tables.R:5:2
     2. │ └─testthat::quasi_label(enquo(object), arg = "object")
     3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
     4. ├─gt::info_date_style()
     5. │ └─... %>% ...
     6. ├─gt::tab_style(., style = cell_text(font = "monospace"), locations = cells_body(columns = date))
     7. │ └─gt:::stop_if_not_gt(data = data)
     8. │   └─gt:::is_gt(data)
     9. ├─gt::cols_label(...)
    10. │ └─gt:::stop_if_not_gt(data = .data)
    11. │   └─gt:::is_gt(data)
    12. ├─gt::opt_align_table_header(., align = "left")
    13. │ └─gt:::stop_if_not_gt(data = data)
    14. │   └─gt:::is_gt(data)
    15. ├─gt::text_transform(...)
    16. │ └─gt:::stop_if_not_gt(data = data)
    17. │   └─gt:::is_gt(data)
    18. ├─gt::tab_header(., title = "Date Formatting Options", subtitle = md("Usable in the `fmt_date()` and `fmt_datetime()` functions"))
    19. │ └─gt:::stop_if_not_gt(data = data)
    20. │   └─gt:::is_gt(data)
    21. ├─gt::fmt_date(., columns = date, rows = 41, date_style = 41)
    22. │ └─gt:::stop_if_not_gt(data = data)
    23. │   └─gt:::is_gt(data)
    24. ├─gt::fmt_date(., columns = date, rows = 40, date_style = 40)
    25. │ └─gt:::stop_if_not_gt(data = data)
    26. │   └─gt:::is_gt(data)
    27. ├─gt::fmt_date(., columns = date, rows = 39, date_style = 39)
    28. │ └─gt:::stop_if_not_gt(data = data)
    29. │   └─gt:::is_gt(data)
    30. ├─gt::fmt_date(., columns = date, rows = 38, date_style = 38)
    31. │ └─gt:::stop_if_not_gt(data = data)
    32. │   └─gt:::is_gt(data)
    33. ├─gt::fmt_date(., columns = date, rows = 37, date_style = 37)
    34. │ └─gt:::stop_if_not_gt(data = data)
    35. │   └─gt:::is_gt(data)
    36. ├─gt::fmt_date(., columns = date, rows = 36, date_style = 36)
    37. │ └─gt:::stop_if_not_gt(data = data)
    38. │   └─gt:::is_gt(data)
    39. ├─gt::fmt_date(., columns = date, rows = 35, date_style = 35)
    40. │ └─gt:::stop_if_not_gt(data = data)
    41. │   └─gt:::is_gt(data)
    42. ├─gt::fmt_date(., columns = date, rows = 34, date_style = 34)
    43. │ └─gt:::stop_if_not_gt(data = data)
    44. │   └─gt:::is_gt(data)
    45. ├─gt::fmt_date(., columns = date, rows = 33, date_style = 33)
    46. │ └─gt:::stop_if_not_gt(data = data)
    47. │   └─gt:::is_gt(data)
    48. ├─gt::fmt_date(., columns = date, rows = 32, date_style = 32)
    49. │ └─gt:::stop_if_not_gt(data = data)
    50. │   └─gt:::is_gt(data)
    51. ├─gt::fmt_date(., columns = date, rows = 31, date_style = 31)
    52. │ └─gt:::stop_if_not_gt(data = data)
    53. │   └─gt:::is_gt(data)
    54. ├─gt::fmt_date(., columns = date, rows = 30, date_style = 30)
    55. │ └─gt:::stop_if_not_gt(data = data)
    56. │   └─gt:::is_gt(data)
    57. ├─gt::fmt_date(., columns = date, rows = 29, date_style = 29)
    58. │ └─gt:::stop_if_not_gt(data = data)
    59. │   └─gt:::is_gt(data)
    60. ├─gt::fmt_date(., columns = date, rows = 28, date_style = 28)
    61. │ └─gt:::stop_if_not_gt(data = data)
    62. │   └─gt:::is_gt(data)
    63. ├─gt::fmt_date(., columns = date, rows = 27, date_style = 27)
    64. │ └─gt:::stop_if_not_gt(data = data)
    65. │   └─gt:::is_gt(data)
    66. ├─gt::fmt_date(., columns = date, rows = 26, date_style = 26)
    67. │ └─gt:::stop_if_not_gt(data = data)
    68. │   └─gt:::is_gt(data)
    69. ├─gt::fmt_date(., columns = date, rows = 25, date_style = 25)
    70. │ └─gt:::stop_if_not_gt(data = data)
    71. │   └─gt:::is_gt(data)
    72. ├─gt::fmt_date(., columns = date, rows = 24, date_style = 24)
    73. │ └─gt:::stop_if_not_gt(data = data)
    74. │   └─gt:::is_gt(data)
    75. ├─gt::fmt_date(., columns = date, rows = 23, date_style = 23)
    76. │ └─gt:::stop_if_not_gt(data = data)
    77. │   └─gt:::is_gt(data)
    78. ├─gt::fmt_date(., columns = date, rows = 22, date_style = 22)
    79. │ └─gt:::stop_if_not_gt(data = data)
    80. │   └─gt:::is_gt(data)
    81. ├─gt::fmt_date(., columns = date, rows = 21, date_style = 21)
    82. │ └─gt:::stop_if_not_gt(data = data)
    83. │   └─gt:::is_gt(data)
    84. ├─gt::fmt_date(., columns = date, rows = 20, date_style = 20)
    85. │ └─gt:::stop_if_not_gt(data = data)
    86. │   └─gt:::is_gt(data)
    87. ├─gt::fmt_date(., columns = date, rows = 19, date_style = 19)
    88. │ └─gt:::stop_if_not_gt(data = data)
    89. │   └─gt:::is_gt(data)
    90. ├─gt::fmt_date(., columns = date, rows = 18, date_style = 18)
    91. │ └─gt:::stop_if_not_gt(data = data)
    92. │   └─gt:::is_gt(data)
    93. ├─gt::fmt_date(., columns = date, rows = 17, date_style = 17)
    94. │ └─gt:::stop_if_not_gt(data = data)
    95. │   └─gt:::is_gt(data)
    96. ├─gt::fmt_date(., columns = date, rows = 16, date_style = 16)
    97. │ └─gt:::stop_if_not_gt(data = data)
    98. │   └─gt:::is_gt(data)
    99. ├─gt::fmt_date(., columns = date, rows = 15, date_style = 15)
   100. │ └─gt:::stop_if_not_gt(data = data)
   101. │   └─gt:::is_gt(data)
   102. ├─gt::fmt_date(., columns = date, rows = 14, date_style = 14)
   103. │ └─gt:::stop_if_not_gt(data = data)
   104. │   └─gt:::is_gt(data)
   105. ├─gt::fmt_date(., columns = date, rows = 13, date_style = 13)
   106. │ └─gt:::stop_if_not_gt(data = data)
   107. │   └─gt:::is_gt(data)
   108. ├─gt::fmt_date(., columns = date, rows = 12, date_style = 12)
   109. │ └─gt:::stop_if_not_gt(data = data)
   110. │   └─gt:::is_gt(data)
   111. ├─gt::fmt_date(., columns = date, rows = 11, date_style = 11)
   112. │ └─gt:::stop_if_not_gt(data = data)
   113. │   └─gt:::is_gt(data)
   114. ├─gt::fmt_date(., columns = date, rows = 10, date_style = 10)
   115. │ └─gt:::stop_if_not_gt(data = data)
   116. │   └─gt:::is_gt(data)
   117. ├─gt::fmt_date(., columns = date, rows = 9, date_style = 9)
   118. │ └─gt:::stop_if_not_gt(data = data)
   119. │   └─gt:::is_gt(data)
   120. ├─gt::fmt_date(., columns = date, rows = 8, date_style = 8)
   121. │ └─gt:::stop_if_not_gt(data = data)
   122. │   └─gt:::is_gt(data)
   123. ├─gt::fmt_date(., columns = date, rows = 7, date_style = 7)
   124. │ └─gt:::stop_if_not_gt(data = data)
   125. │   └─gt:::is_gt(data)
   126. ├─gt::fmt_date(., columns = date, rows = 6, date_style = 6)
   127. │ └─gt:::stop_if_not_gt(data = data)
   128. │   └─gt:::is_gt(data)
   129. ├─gt::fmt_date(., columns = date, rows = 5, date_style = 5)
   130. │ └─gt:::stop_if_not_gt(data = data)
   131. │   └─gt:::is_gt(data)
   132. ├─gt::fmt_date(., columns = date, rows = 4, date_style = 4)
   133. │ └─gt:::stop_if_not_gt(data = data)
   134. │   └─gt:::is_gt(data)
   135. ├─gt::fmt_date(., columns = date, rows = 3, date_style = 3)
   136. │ └─gt:::stop_if_not_gt(data = data)
   137. │   └─gt:::is_gt(data)
   138. ├─gt::fmt_date(., columns = date, rows = 2, date_style = 2)
   139. │ └─gt:::stop_if_not_gt(data = data)
   140. │   └─gt:::is_gt(data)
   141. ├─gt::fmt_date(., columns = date, rows = 1, date_style = 1)
   142. │ └─gt:::stop_if_not_gt(data = data)
   143. │   └─gt:::is_gt(data)
   144. ├─gt::cols_hide(., columns = format_code)
   145. │ └─gt:::stop_if_not_gt(data = data)
   146. │   └─gt:::is_gt(data)
   147. └─gt::gt(., rowname_col = "format_number")
   148.   └─gt:::dt_stub_df_init(...)
   149.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   150.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   151.       └─tibble:::`[<-.tbl_df`(...)
   152.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   153.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   154.             ├─base::withCallingHandlers(...)
   155.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-info_tables.R:21:3'): the `info_time_style()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
        ▆
     1. ├─testthat::expect_s3_class(info_time_style(), c("gt_tbl", "data.frame")) at test-info_tables.R:21:2
     2. │ └─testthat::quasi_label(enquo(object), arg = "object")
     3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
     4. ├─gt::info_time_style()
     5. │ └─... %>% cols_align(align = "center", columns = time_type)
     6. ├─gt::cols_align(., align = "center", columns = time_type)
     7. │ └─gt:::stop_if_not_gt(data = data)
     8. │   └─gt:::is_gt(data)
     9. ├─gt::sub_missing(., columns = time_type)
    10. │ └─gt:::stop_if_not_gt(data = data)
    11. │   └─gt:::is_gt(data)
    12. ├─gt::tab_style(., style = cell_text(font = "monospace"), locations = cells_body(columns = time))
    13. │ └─gt:::stop_if_not_gt(data = data)
    14. │   └─gt:::is_gt(data)
    15. ├─gt::tab_style(., style = cell_text(size = "smaller"), locations = cells_body(columns = time_type))
    16. │ └─gt:::stop_if_not_gt(data = data)
    17. │   └─gt:::is_gt(data)
    18. ├─gt::cols_label(...)
    19. │ └─gt:::stop_if_not_gt(data = .data)
    20. │   └─gt:::is_gt(data)
    21. ├─gt::opt_align_table_header(., align = "left")
    22. │ └─gt:::stop_if_not_gt(data = data)
    23. │   └─gt:::is_gt(data)
    24. ├─gt::text_transform(...)
    25. │ └─gt:::stop_if_not_gt(data = data)
    26. │   └─gt:::is_gt(data)
    27. ├─gt::tab_header(., title = "Time Formatting Options", subtitle = md("Usable in the `fmt_time()` and `fmt_datetime()` functions"))
    28. │ └─gt:::stop_if_not_gt(data = data)
    29. │   └─gt:::is_gt(data)
    30. ├─gt::fmt_time(., columns = time, rows = 25, time_style = 25)
    31. │ └─gt:::stop_if_not_gt(data = data)
    32. │   └─gt:::is_gt(data)
    33. ├─gt::fmt_time(., columns = time, rows = 24, time_style = 24)
    34. │ └─gt:::stop_if_not_gt(data = data)
    35. │   └─gt:::is_gt(data)
    36. ├─gt::fmt_time(., columns = time, rows = 23, time_style = 23)
    37. │ └─gt:::stop_if_not_gt(data = data)
    38. │   └─gt:::is_gt(data)
    39. ├─gt::fmt_time(., columns = time, rows = 22, time_style = 22)
    40. │ └─gt:::stop_if_not_gt(data = data)
    41. │   └─gt:::is_gt(data)
    42. ├─gt::fmt_time(., columns = time, rows = 21, time_style = 21)
    43. │ └─gt:::stop_if_not_gt(data = data)
    44. │   └─gt:::is_gt(data)
    45. ├─gt::fmt_time(., columns = time, rows = 20, time_style = 20)
    46. │ └─gt:::stop_if_not_gt(data = data)
    47. │   └─gt:::is_gt(data)
    48. ├─gt::fmt_time(., columns = time, rows = 19, time_style = 19)
    49. │ └─gt:::stop_if_not_gt(data = data)
    50. │   └─gt:::is_gt(data)
    51. ├─gt::fmt_time(., columns = time, rows = 18, time_style = 18)
    52. │ └─gt:::stop_if_not_gt(data = data)
    53. │   └─gt:::is_gt(data)
    54. ├─gt::fmt_time(., columns = time, rows = 17, time_style = 17)
    55. │ └─gt:::stop_if_not_gt(data = data)
    56. │   └─gt:::is_gt(data)
    57. ├─gt::fmt_time(., columns = time, rows = 16, time_style = 16)
    58. │ └─gt:::stop_if_not_gt(data = data)
    59. │   └─gt:::is_gt(data)
    60. ├─gt::fmt_time(., columns = time, rows = 15, time_style = 15)
    61. │ └─gt:::stop_if_not_gt(data = data)
    62. │   └─gt:::is_gt(data)
    63. ├─gt::fmt_time(., columns = time, rows = 14, time_style = 14)
    64. │ └─gt:::stop_if_not_gt(data = data)
    65. │   └─gt:::is_gt(data)
    66. ├─gt::fmt_time(., columns = time, rows = 13, time_style = 13)
    67. │ └─gt:::stop_if_not_gt(data = data)
    68. │   └─gt:::is_gt(data)
    69. ├─gt::fmt_time(., columns = time, rows = 12, time_style = 12)
    70. │ └─gt:::stop_if_not_gt(data = data)
    71. │   └─gt:::is_gt(data)
    72. ├─gt::fmt_time(., columns = time, rows = 11, time_style = 11)
    73. │ └─gt:::stop_if_not_gt(data = data)
    74. │   └─gt:::is_gt(data)
    75. ├─gt::fmt_time(., columns = time, rows = 10, time_style = 10)
    76. │ └─gt:::stop_if_not_gt(data = data)
    77. │   └─gt:::is_gt(data)
    78. ├─gt::fmt_time(., columns = time, rows = 9, time_style = 9)
    79. │ └─gt:::stop_if_not_gt(data = data)
    80. │   └─gt:::is_gt(data)
    81. ├─gt::fmt_time(., columns = time, rows = 8, time_style = 8)
    82. │ └─gt:::stop_if_not_gt(data = data)
    83. │   └─gt:::is_gt(data)
    84. ├─gt::fmt_time(., columns = time, rows = 7, time_style = 7)
    85. │ └─gt:::stop_if_not_gt(data = data)
    86. │   └─gt:::is_gt(data)
    87. ├─gt::fmt_time(., columns = time, rows = 6, time_style = 6)
    88. │ └─gt:::stop_if_not_gt(data = data)
    89. │   └─gt:::is_gt(data)
    90. ├─gt::fmt_time(., columns = time, rows = 5, time_style = 5)
    91. │ └─gt:::stop_if_not_gt(data = data)
    92. │   └─gt:::is_gt(data)
    93. ├─gt::fmt_time(., columns = time, rows = 4, time_style = 4)
    94. │ └─gt:::stop_if_not_gt(data = data)
    95. │   └─gt:::is_gt(data)
    96. ├─gt::fmt_time(., columns = time, rows = 3, time_style = 3)
    97. │ └─gt:::stop_if_not_gt(data = data)
    98. │   └─gt:::is_gt(data)
    99. ├─gt::fmt_time(., columns = time, rows = 2, time_style = 2)
   100. │ └─gt:::stop_if_not_gt(data = data)
   101. │   └─gt:::is_gt(data)
   102. ├─gt::fmt_time(., columns = time, rows = 1, time_style = 1)
   103. │ └─gt:::stop_if_not_gt(data = data)
   104. │   └─gt:::is_gt(data)
   105. ├─gt::cols_hide(., columns = format_code)
   106. │ └─gt:::stop_if_not_gt(data = data)
   107. │   └─gt:::is_gt(data)
   108. └─gt::gt(., rowname_col = "format_number")
   109.   └─gt:::dt_stub_df_init(...)
   110.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   111.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   112.       └─tibble:::`[<-.tbl_df`(...)
   113.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   114.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   115.             ├─base::withCallingHandlers(...)
   116.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-info_tables.R:37:3'): the `info_google_fonts()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_s3_class(info_google_fonts(), c("gt_tbl", "data.frame")) at test-info_tables.R:37:2
    2. │ └─testthat::quasi_label(enquo(object), arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─gt::info_google_fonts()
    5. │ └─... %>% tab_source_note(md(source_notes))
    6. ├─gt::tab_source_note(., md(source_notes))
    7. │ └─gt:::stop_if_not_gt(data = data)
    8. │   └─gt:::is_gt(data)
    9. ├─gt::tab_options(...)
   10. │ └─gt:::stop_if_not_gt(data = data)
   11. │   └─gt:::is_gt(data)
   12. ├─gt::opt_table_lines(., "none")
   13. │ └─gt:::stop_if_not_gt(data = data)
   14. │   └─gt:::is_gt(data)
   15. ├─gt::opt_align_table_header(., "left")
   16. │ └─gt:::stop_if_not_gt(data = data)
   17. │   └─gt:::is_gt(data)
   18. ├─gt::tab_header(...)
   19. │ └─gt:::stop_if_not_gt(data = data)
   20. │   └─gt:::is_gt(data)
   21. ├─gt::tab_style(...)
   22. │ └─gt:::stop_if_not_gt(data = data)
   23. │   └─gt:::is_gt(data)
   24. ├─gt::tab_style(., style = cell_text(size = px(14)), locations = cells_stub())
   25. │ └─gt:::stop_if_not_gt(data = data)
   26. │   └─gt:::is_gt(data)
   27. ├─gt::tab_style(...)
   28. │ └─gt:::stop_if_not_gt(data = data)
   29. │   └─gt:::is_gt(data)
   30. ├─gt::tab_style(., style = cell_text(size = px(18)), locations = cells_title(groups = "subtitle"))
   31. │ └─gt:::stop_if_not_gt(data = data)
   32. │   └─gt:::is_gt(data)
   33. ├─gt::tab_style(., style = cell_text(size = px(24)), locations = cells_title(groups = "title"))
   34. │ └─gt:::stop_if_not_gt(data = data)
   35. │   └─gt:::is_gt(data)
   36. ├─gt::tab_style(...)
   37. │ └─gt:::stop_if_not_gt(data = data)
   38. │   └─gt:::is_gt(data)
   39. ├─gt::fmt_markdown(., columns = "weight_ranges")
   40. │ └─gt:::stop_if_not_gt(data = data)
   41. │   └─gt:::is_gt(data)
   42. └─gt::gt(., rowname_col = "name", groupname_col = "category")
   43.   └─gt:::dt_stub_df_init(...)
   44.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   45.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   46.       └─tibble:::`[<-.tbl_df`(...)
   47.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   48.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   49.             ├─base::withCallingHandlers(...)
   50.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:15:3'): a gt table object contains the correct components ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─iris %>% gt() at test-gt_object.R:15:2
    2. └─gt::gt(.)
    3.   └─gt::cols_align(data = data, align = "auto")
    4.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    5.       ├─base::`[[<-`(...)
    6.       └─tibble:::`[[<-.tbl_df`(...)
    7.         └─tibble:::tbl_subassign(...)
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:47:3'): a gt table can be made to use the rownames of a data frame ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─mtcars %>% gt(rownames_to_stub = TRUE) at test-gt_object.R:47:2
    2. └─gt::gt(., rownames_to_stub = TRUE)
    3.   └─gt:::dt_stub_df_init(...)
    4.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
    5.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
    6.       └─tibble:::`[<-.tbl_df`(...)
    7.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:79:3'): a gt table can be made with the stub partially or fully populated ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─data_r %>% gt() at test-gt_object.R:79:2
    2. └─gt::gt(.)
    3.   └─gt:::dt_stub_df_init(...)
    4.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
    5.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
    6.       └─tibble:::`[<-.tbl_df`(...)
    7.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:131:3'): a gt table can be made from a table with no rows ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─data_e %>% gt() at test-gt_object.R:131:2
    2. └─gt::gt(.)
    3.   └─gt::cols_align(data = data, align = "auto")
    4.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    5.       ├─base::`[[<-`(...)
    6.       └─tibble:::`[[<-.tbl_df`(...)
    7.         └─tibble:::tbl_subassign(...)
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:231:5'): a gt table can use UTF-8 chars in any system locale ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt (local) test_df_output_with_sys_locale(...) at test-gt_object.R:231:4
    2. │ ├─testthat::expect_identical(...) at test-gt_object.R:208:4
    3. │ │ └─testthat::quasi_label(enquo(expected), expected.label, arg = "expected")
    4. │ │   └─rlang::eval_bare(expr, quo_get_env(quo))
    5. │ ├─... %>% sort()
    6. │ └─df %>% gt() %>% render_formats_test("html")
    7. ├─base::sort(.)
    8. ├─base::unname(.)
    9. ├─base::unlist(.)
   10. ├─gt:::render_formats_test(., "html")
   11. │ └─data %>% build_data(context = context) %>% .$`_body` at tests/testthat/helper-render_formats.R:5:2
   12. ├─gt:::build_data(., context = context)
   13. │ └─gt:::stop_if_not_gt(data = data)
   14. │   └─gt:::is_gt(data)
   15. └─gt::gt(.)
   16.   └─gt::cols_align(data = data, align = "auto")
   17.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   18.       ├─base::`[[<-`(...)
   19.       └─tibble:::`[[<-.tbl_df`(...)
   20.         └─tibble:::tbl_subassign(...)
   21.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   22.             ├─base::withCallingHandlers(...)
   23.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:244:3'): gt table can be made with grouped data -- one group ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─exibble %>% dplyr::group_by(group) %>% gt() %>% ... at test-gt_object.R:244:2
    2. ├─gt:::build_data(., context = "html")
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(.)
    6.   └─gt:::dt_stub_df_init(...)
    7.     └─gt:::dt_boxhead_set_row_group(data = data, vars = groupname_col)
    8.       ├─base::`[<-`(...)
    9.       └─tibble:::`[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:316:3'): gt table can be made with grouped data - two groups ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% build_data(context = "html") at test-gt_object.R:316:2
    2. ├─gt:::build_data(., context = "html")
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(.)
    6.   └─gt:::dt_stub_df_init(...)
    7.     └─gt:::dt_boxhead_set_row_group(data = data, vars = groupname_col)
    8.       ├─base::`[<-`(...)
    9.       └─tibble:::`[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:406:3'): The `gt()` groupname_col arg will override any grouped data ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% build_data(context = "html") at test-gt_object.R:406:2
    2. ├─gt:::build_data(., context = "html")
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(., groupname_col = "date")
    6.   └─gt:::dt_stub_df_init(...)
    7.     └─gt:::dt_boxhead_set_row_group(data = data, vars = groupname_col)
    8.       ├─base::`[<-`(...)
    9.       └─tibble:::`[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test-gt_object.R:510:3'): The `gt()` `id` arg will only accept specific inputs ──
  `exibble %>% gt()` threw an unexpected error.
  Message: DLL requires the use of native symbols
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(regexp = NA, exibble %>% gt()) at test-gt_object.R:510:2
    2. │ └─testthat:::expect_condition_matching(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─exibble %>% gt()
    8. └─gt::gt(.)
    9.   └─gt::cols_align(data = data, align = "auto")
   10.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   11.       ├─base::`[[<-`(...)
   12.       └─tibble:::`[[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(...)
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test-gt_object.R:511:3'): The `gt()` `id` arg will only accept specific inputs ──
  `exibble %>% gt(id = NULL)` threw an unexpected error.
  Message: DLL requires the use of native symbols
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(regexp = NA, exibble %>% gt(id = NULL)) at test-gt_object.R:511:2
    2. │ └─testthat:::expect_condition_matching(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─exibble %>% gt(id = NULL)
    8. └─gt::gt(., id = NULL)
    9.   └─gt::cols_align(data = data, align = "auto")
   10.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   11.       ├─base::`[[<-`(...)
   12.       └─tibble:::`[[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(...)
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test-gt_object.R:512:3'): The `gt()` `id` arg will only accept specific inputs ──
  `exibble %>% gt(id = "sldfjlds")` threw an unexpected error.
  Message: DLL requires the use of native symbols
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(regexp = NA, exibble %>% gt(id = "sldfjlds")) at test-gt_object.R:512:2
    2. │ └─testthat:::expect_condition_matching(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─exibble %>% gt(id = "sldfjlds")
    8. └─gt::gt(., id = "sldfjlds")
    9.   └─gt::cols_align(data = data, align = "auto")
   10.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   11.       ├─base::`[[<-`(...)
   12.       └─tibble:::`[[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(...)
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Failure ('test-gt_object.R:513:3'): The `gt()` `id` arg will only accept specific inputs ──
  `exibble %>% gt(id = "23947294")` threw an unexpected error.
  Message: DLL requires the use of native symbols
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(regexp = NA, exibble %>% gt(id = "23947294")) at test-gt_object.R:513:2
    2. │ └─testthat:::expect_condition_matching(...)
    3. │   └─testthat:::quasi_capture(...)
    4. │     ├─testthat (local) .capture(...)
    5. │     │ └─base::withCallingHandlers(...)
    6. │     └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    7. ├─exibble %>% gt(id = "23947294")
    8. └─gt::gt(., id = "23947294")
    9.   └─gt::cols_align(data = data, align = "auto")
   10.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   11.       ├─base::`[[<-`(...)
   12.       └─tibble:::`[[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(...)
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:527:3'): The `gt()` `rowname_col` arg will be overridden by `rownames_to_stub = TRUE` ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% build_data(context = "html") at test-gt_object.R:527:2
    2. ├─gt:::build_data(., context = "html")
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(., rownames_to_stub = TRUE, rowname_col = "disp")
    6.   └─gt:::dt_stub_df_init(...)
    7.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
    8.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
    9.       └─tibble:::`[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:598:3'): The `rowname` column will be safely included when `rownames_to_stub = TRUE` ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% build_data(context = "html") at test-gt_object.R:598:2
    2. ├─gt:::build_data(., context = "html")
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(., rownames_to_stub = TRUE)
    6.   └─gt:::dt_stub_df_init(...)
    7.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
    8.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
    9.       └─tibble:::`[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:709:3'): Escapable characters in rownames are handled correctly in each output context ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_match(...) at test-gt_object.R:709:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─gt(tbl, rownames_to_stub = TRUE) %>% render_as_html()
    5. ├─gt:::render_as_html(.)
    6. │ └─gt:::build_data(data = data, context = "html")
    7. │   └─gt:::stop_if_not_gt(data = data)
    8. │     └─gt:::is_gt(data)
    9. └─gt::gt(tbl, rownames_to_stub = TRUE)
   10.   └─gt:::dt_stub_df_init(...)
   11.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   12.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   13.       └─tibble:::`[<-.tbl_df`(...)
   14.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   15.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   16.             ├─base::withCallingHandlers(...)
   17.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:806:3'): Default locale settings are honored by formatting functions ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% expect_equal("777,000.00") at test-gt_object.R:806:2
    2. ├─testthat::expect_equal(., "777,000.00")
    3. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    4. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    5. ├─exibble_1 %>% gt() %>% fmt_number(num) %>% ...
    6. ├─gt:::render_formats_test(., context = "plain")
    7. │ └─data %>% build_data(context = context) %>% .$`_body` at tests/testthat/helper-render_formats.R:5:2
    8. ├─gt:::build_data(., context = context)
    9. │ └─gt:::stop_if_not_gt(data = data)
   10. │   └─gt:::is_gt(data)
   11. ├─gt::fmt_number(., num)
   12. │ └─gt:::stop_if_not_gt(data = data)
   13. │   └─gt:::is_gt(data)
   14. └─gt::gt(.)
   15.   └─gt::cols_align(data = data, align = "auto")
   16.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   17.       ├─base::`[[<-`(...)
   18.       └─tibble:::`[[<-.tbl_df`(...)
   19.         └─tibble:::tbl_subassign(...)
   20.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   21.             ├─base::withCallingHandlers(...)
   22.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:883:3'): Default locale settings are honored when generating summary rows ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% ... at test-gt_object.R:883:2
    2. ├─gt::summary_rows(...)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. ├─gt::fmt_number(., columns = num, decimals = 2)
    6. │ └─gt:::stop_if_not_gt(data = data)
    7. │   └─gt:::is_gt(data)
    8. └─gt::gt(., rowname_col = "row", groupname_col = "group", locale = "de")
    9.   └─gt:::dt_stub_df_init(...)
   10.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   11.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   12.       └─tibble:::`[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-gt_object.R:907:3'): Formatting functions operate with a 'last-one-wins' approach ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% ... at test-gt_object.R:907:2
    2. ├─gt::fmt_number(., columns = num, rows = 2, decimals = 4, pattern = "a{x}b")
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. ├─gt::fmt_number(., columns = num, decimals = 5)
    6. │ └─gt:::stop_if_not_gt(data = data)
    7. │   └─gt:::is_gt(data)
    8. └─gt::gt(.)
    9.   └─gt::cols_align(data = data, align = "auto")
   10.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   11.       ├─base::`[[<-`(...)
   12.       └─tibble:::`[[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(...)
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_cols_align.R:14:3'): the `cols_align()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% as.character() at test-l_cols_align.R:14:2
    2. ├─gt::as_latex(.)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. ├─gt::cols_align(., align = "left", columns = c(mpg, cyl, drat))
    6. │ └─gt:::stop_if_not_gt(data = data)
    7. │   └─gt:::is_gt(data)
    8. └─gt::gt(mtcars_short)
    9.   └─gt::cols_align(data = data, align = "auto")
   10.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   11.       ├─base::`[[<-`(...)
   12.       └─tibble:::`[[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(...)
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_cols_merge.R:23:3'): the function `cols_merge()` works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─mtcars_short %>% gt() %>% ... at test-l_cols_merge.R:23:2
    2. ├─gt::cols_merge(...)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(.)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_cols_merge.R:100:3'): the `cols_merge_uncert()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─tbl %>% gt() %>% ... at test-l_cols_merge.R:100:2
    2. ├─gt::cols_merge_uncert(., col_val = "col_1", col_uncert = "col_2")
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(.)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_cols_merge.R:188:3'): the `cols_merge_range()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─tbl %>% gt() %>% ... at test-l_cols_merge.R:188:2
    2. ├─gt::cols_merge_range(., col_begin = "col_1", col_end = "col_2")
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(.)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_cols_move.R:8:3'): the `cols_move()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt(mtcars_short) %>% ... at test-l_cols_move.R:8:2
    2. ├─gt::cols_move(., columns = c(mpg, cyl, disp), after = drat)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(mtcars_short)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_cols_move.R:53:3'): the `cols_move_to_start()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt(mtcars_short) %>% ... at test-l_cols_move.R:53:2
    2. ├─gt::cols_move_to_start(., columns = c(gear, carb))
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(mtcars_short)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_cols_move.R:84:3'): the `cols_move_to_end()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt(mtcars_short) %>% ... at test-l_cols_move.R:84:2
    2. ├─gt::cols_move_to_end(., columns = c(gear, carb))
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(mtcars_short)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_conditional_fmt.R:13:1'): (code run outside of `test_that()`) ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_conditional_fmt.R:13:0
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_currency.R:18:3'): the `fmt_currency()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_currency.R:18:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-input_data_validation.R:61:3'): certain `fmt_*()` functions stop if given incompatible column data ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─exibble %>% gt() at test-input_data_validation.R:61:2
    2. └─gt::gt(.)
    3.   └─gt::cols_align(data = data, align = "auto")
    4.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    5.       ├─base::`[[<-`(...)
    6.       └─tibble:::`[[<-.tbl_df`(...)
    7.         └─tibble:::tbl_subassign(...)
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_date_time.R:11:3'): the `fmt_date()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_date_time.R:11:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_date_time.R:282:3'): the `fmt_time()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_date_time.R:282:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_date_time.R:337:3'): the `fmt_datetime()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_date_time.R:337:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_engineering.R:39:3'): the `fmt_engineering()` function works correctly in the LaTeX context ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_engineering.R:39:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_engineering.R:267:3'): `fmt_engineering() can handle extremely large and small values ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_engineering.R:267:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_markdown.R:36:3'): the `fmt_markdown()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% fmt_markdown(columns = everything()) at test-l_fmt_markdown.R:36:2
    2. ├─gt::fmt_markdown(., columns = everything())
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(.)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_integer.R:17:3'): the `fmt_integer()` function works correctly in the LaTeX context ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_integer.R:17:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_integer.R:202:3'): the `fmt_integer()` function can scale/suffix larger numbers ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_integer.R:202:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_missing.R:12:3'): the `sub_missing()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_missing.R:12:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_number.R:18:3'): the `fmt_number()` function works correctly in the LaTeX context ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_number.R:18:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_passthrough.R:17:3'): the `fmt_passthrough()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_passthrough.R:17:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_percent.R:18:3'): the `fmt_percent()` function works correctly in the LaTeX context ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_percent.R:18:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_fmt_scientific.R:18:3'): the `fmt_scientific()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(data_tbl) at test-l_fmt_scientific.R:18:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_row_group_order.R:21:3'): the `row_group_order()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─tbl %>% gt(groupname_col = "dates") %>% ... at test-l_row_group_order.R:21:2
    2. ├─gt::row_group_order(., groups = c("2018-02-11", "2018-02-10"))
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(., groupname_col = "dates")
    6.   └─gt:::dt_stub_df_init(...)
    7.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
    8.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
    9.       └─tibble:::`[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-l_tab_spanner_delim.R:8:3'): the `tab_spanner_delim()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt(iris_short) %>% tab_spanner_delim(delim = ".") at test-l_tab_spanner_delim.R:8:2
    2. ├─gt::tab_spanner_delim(., delim = ".")
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(iris_short)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-r_table_parts.R:8:3'): a gt table contains the expected column spanner labels ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─gt(rock) %>% ... at test-r_table_parts.R:8:2
    2. ├─gt::tab_spanner(., label = "perimeter", columns = c("peri", "shape"))
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(rock)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-opt_functions.R:10:3'): The `opt_footnote_marks()` function sets the correct options ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% expect_equal("numbers") at test-opt_functions.R:10:2
    2. ├─testthat::expect_equal(., "numbers")
    3. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    4. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    5. ├─gt:::dt_options_get_value(., "footnotes_marks")
    6. │ └─gt:::dt_options_get(data = data)
    7. │   └─gt:::dt__get(data, .dt_options_key)
    8. └─gt::gt(.)
    9.   └─gt::cols_align(data = data, align = "auto")
   10.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   11.       ├─base::`[[<-`(...)
   12.       └─tibble:::`[[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(...)
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-opt_functions.R:35:3'): The `opt_row_striping()` function sets the correct options ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% expect_false() at test-opt_functions.R:35:2
    2. ├─testthat::expect_false(.)
    3. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    4. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    5. ├─gt:::dt_options_get_value(., "row_striping_include_table_body")
    6. │ └─gt:::dt_options_get(data = data)
    7. │   └─gt:::dt__get(data, .dt_options_key)
    8. └─gt::gt(.)
    9.   └─gt::cols_align(data = data, align = "auto")
   10.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   11.       ├─base::`[[<-`(...)
   12.       └─tibble:::`[[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(...)
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-opt_functions.R:56:3'): The `opt_align_table_header()` function sets the correct options ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% expect_equal("center") at test-opt_functions.R:56:2
    2. ├─testthat::expect_equal(., "center")
    3. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    4. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    5. ├─gt:::dt_options_get_value(., "heading_align")
    6. │ └─gt:::dt_options_get(data = data)
    7. │   └─gt:::dt__get(data, .dt_options_key)
    8. └─gt::gt(.)
    9.   └─gt::cols_align(data = data, align = "auto")
   10.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   11.       ├─base::`[[<-`(...)
   12.       └─tibble:::`[[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(...)
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-opt_functions.R:92:3'): The `opt_all_caps()` function sets the correct options ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─exibble %>% gt() at test-opt_functions.R:92:2
    2. └─gt::gt(.)
    3.   └─gt::cols_align(data = data, align = "auto")
    4.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    5.       ├─base::`[[<-`(...)
    6.       └─tibble:::`[[<-.tbl_df`(...)
    7.         └─tibble:::tbl_subassign(...)
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-opt_functions.R:145:3'): The `opt_table_lines()` function sets the correct options ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─exibble %>% gt() at test-opt_functions.R:145:2
    2. └─gt::gt(.)
    3.   └─gt::cols_align(data = data, align = "auto")
    4.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    5.       ├─base::`[[<-`(...)
    6.       └─tibble:::`[[<-.tbl_df`(...)
    7.         └─tibble:::tbl_subassign(...)
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-opt_functions.R:245:3'): The `opt_table_outline()` function sets the correct options ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─exibble %>% gt() at test-opt_functions.R:245:2
    2. └─gt::gt(.)
    3.   └─gt::cols_align(data = data, align = "auto")
    4.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    5.       ├─base::`[[<-`(...)
    6.       └─tibble:::`[[<-.tbl_df`(...)
    7.         └─tibble:::tbl_subassign(...)
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-opt_functions.R:316:3'): The `opt_table_font()` function sets the correct options ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─exibble %>% dplyr::select(char, time) %>% gt() at test-opt_functions.R:316:2
    2. └─gt::gt(.)
    3.   └─gt::cols_align(data = data, align = "auto")
    4.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    5.       ├─base::`[[<-`(...)
    6.       └─tibble:::`[[<-.tbl_df`(...)
    7.         └─tibble:::tbl_subassign(...)
    8.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
    9.             ├─base::withCallingHandlers(...)
   10.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-row_group_order.R:34:3'): the `row_group_order()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% ... at test-row_group_order.R:34:2
    2. ├─gt::row_group_order(., groups = c("2018-02-11", "2018-02-10"))
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(., rowname_col = "rows", groupname_col = "dates")
    6.   └─gt:::dt_stub_df_init(...)
    7.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
    8.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
    9.       └─tibble:::`[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-row_group_order.R:63:3'): styling at various locations is kept when using `row_group_order()` ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% ... at test-row_group_order.R:63:2
    2. ├─gt::grand_summary_rows(., columns = everything(), fns = list("sum"))
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. ├─gt::summary_rows(., groups = TRUE, columns = everything(), fns = list("sum"))
    6. │ └─gt:::stop_if_not_gt(data = data)
    7. │   └─gt:::is_gt(data)
    8. └─gt::gt(., rowname_col = "rows", groupname_col = "dates")
    9.   └─gt:::dt_stub_df_init(...)
   10.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   11.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   12.       └─tibble:::`[<-.tbl_df`(...)
   13.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   14.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   15.             ├─base::withCallingHandlers(...)
   16.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-resolver.R:38:3'): `resolve_rows_l()` and `resolve_rows_i()` both work ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(mtcars, rownames_to_stub = TRUE) at test-resolver.R:38:2
   2.   └─gt:::dt_stub_df_init(...)
   3.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   4.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   5.       └─tibble:::`[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-tab_caption.R:18:3'): a caption can be added/removed with `tab_caption()`/`rm_caption()` ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─exibble %>% gt() %>% tab_caption(caption = "A caption.") at test-tab_caption.R:18:2
    2. ├─gt::tab_caption(., caption = "A caption.")
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(.)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-tab_style.R:2:1'): (code run outside of `test_that()`) ─────────
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% ... at test-tab_style.R:2:0
    2. ├─gt::summary_rows(...)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. ├─gt::summary_rows(...)
    6. │ └─gt:::stop_if_not_gt(data = data)
    7. │   └─gt:::is_gt(data)
    8. ├─gt::tab_source_note(., source_note = "this is a source note")
    9. │ └─gt:::stop_if_not_gt(data = data)
   10. │   └─gt:::is_gt(data)
   11. ├─gt::tab_header(., title = "Title", subtitle = "Subtitle")
   12. │ └─gt:::stop_if_not_gt(data = data)
   13. │   └─gt:::is_gt(data)
   14. ├─gt::cols_merge_range(., col_begin = "disp", col_end = "drat")
   15. │ └─gt:::stop_if_not_gt(data = data)
   16. │   └─gt:::is_gt(data)
   17. ├─gt::row_group_order(., groups = c("Mazdas", "Mercs"))
   18. │ └─gt:::stop_if_not_gt(data = data)
   19. │   └─gt:::is_gt(data)
   20. ├─gt::tab_spanner(...)
   21. │ └─gt:::stop_if_not_gt(data = data)
   22. │   └─gt:::is_gt(data)
   23. ├─gt::tab_options(., row_group.default_label = "Others")
   24. │ └─gt:::stop_if_not_gt(data = data)
   25. │   └─gt:::is_gt(data)
   26. ├─gt::tab_row_group(., label = "Mazdas", rows = contains("Mazda"))
   27. │ └─gt:::stop_if_not_gt(data = data)
   28. │   └─gt:::is_gt(data)
   29. ├─gt::tab_row_group(., label = "Mercs", rows = contains("Merc"))
   30. │ └─gt:::stop_if_not_gt(data = data)
   31. │   └─gt:::is_gt(data)
   32. ├─gt::cols_hide(., columns = "vs")
   33. │ └─gt:::stop_if_not_gt(data = data)
   34. │   └─gt:::is_gt(data)
   35. ├─gt::cols_hide(., columns = "mpg")
   36. │ └─gt:::stop_if_not_gt(data = data)
   37. │   └─gt:::is_gt(data)
   38. ├─gt::tab_stubhead(., label = "cars")
   39. │ └─gt:::stop_if_not_gt(data = data)
   40. │   └─gt:::is_gt(data)
   41. ├─gt::cols_move_to_start(., columns = c("gear", "carb"))
   42. │ └─gt:::stop_if_not_gt(data = data)
   43. │   └─gt:::is_gt(data)
   44. └─gt::gt(mtcars, rownames_to_stub = TRUE)
   45.   └─gt:::dt_stub_df_init(...)
   46.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   47.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   48.       └─tibble:::`[<-.tbl_df`(...)
   49.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   50.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   51.             ├─base::withCallingHandlers(...)
   52.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-text_transform.R:28:3'): the `text_transform()` function works correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─mtcars_short %>% gt() %>% ... at test-text_transform.R:28:2
    2. ├─gt::text_transform(...)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(.)
    6.   └─gt::cols_align(data = data, align = "auto")
    7.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    8.       ├─base::`[[<-`(...)
    9.       └─tibble:::`[[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(...)
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-text_transform.R:209:3'): `text_transform()` works in the body even when rows/columns are reordered ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% ... at test-text_transform.R:209:2
    2. ├─gt::text_transform(...)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. ├─gt::text_transform(...)
    6. │ └─gt:::stop_if_not_gt(data = data)
    7. │   └─gt:::is_gt(data)
    8. ├─gt::tab_row_group(...)
    9. │ └─gt:::stop_if_not_gt(data = data)
   10. │   └─gt:::is_gt(data)
   11. ├─gt::tab_row_group(...)
   12. │ └─gt:::stop_if_not_gt(data = data)
   13. │   └─gt:::is_gt(data)
   14. └─gt::gt(., rownames_to_stub = TRUE)
   15.   └─gt:::dt_stub_df_init(...)
   16.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   17.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   18.       └─tibble:::`[<-.tbl_df`(...)
   19.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   20.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   21.             ├─base::withCallingHandlers(...)
   22.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-text_transform.R:280:3'): `text_transform()` works in column labels ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% ... at test-text_transform.R:280:2
    2. ├─gt::text_transform(...)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. ├─gt::cols_move_to_end(., columns = cyl)
    6. │ └─gt:::stop_if_not_gt(data = data)
    7. │   └─gt:::is_gt(data)
    8. ├─gt::tab_row_group(...)
    9. │ └─gt:::stop_if_not_gt(data = data)
   10. │   └─gt:::is_gt(data)
   11. ├─gt::tab_row_group(...)
   12. │ └─gt:::stop_if_not_gt(data = data)
   13. │   └─gt:::is_gt(data)
   14. └─gt::gt(., rownames_to_stub = TRUE)
   15.   └─gt:::dt_stub_df_init(...)
   16.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   17.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   18.       └─tibble:::`[<-.tbl_df`(...)
   19.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   20.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   21.             ├─base::withCallingHandlers(...)
   22.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-text_transform.R:316:3'): `text_transform()` works on row labels in the stub ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% ... at test-text_transform.R:316:2
    2. ├─gt::text_transform(...)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. ├─gt::cols_move_to_end(., columns = cyl)
    6. │ └─gt:::stop_if_not_gt(data = data)
    7. │   └─gt:::is_gt(data)
    8. ├─gt::tab_row_group(...)
    9. │ └─gt:::stop_if_not_gt(data = data)
   10. │   └─gt:::is_gt(data)
   11. ├─gt::tab_row_group(...)
   12. │ └─gt:::stop_if_not_gt(data = data)
   13. │   └─gt:::is_gt(data)
   14. └─gt::gt(., rownames_to_stub = TRUE)
   15.   └─gt:::dt_stub_df_init(...)
   16.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
   17.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
   18.       └─tibble:::`[<-.tbl_df`(...)
   19.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   20.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   21.             ├─base::withCallingHandlers(...)
   22.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-text_transform.R:352:3'): `text_transform()` works on row group labels ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─... %>% ... at test-text_transform.R:352:2
    2. ├─gt::text_transform(., locations = cells_row_groups(), fn = toupper)
    3. │ └─gt:::stop_if_not_gt(data = data)
    4. │   └─gt:::is_gt(data)
    5. └─gt::gt(., rowname_col = "row", groupname_col = "group")
    6.   └─gt:::dt_stub_df_init(...)
    7.     └─gt:::dt_boxhead_set_stub(data = data, var = rowname_col)
    8.       ├─base::`[<-`(`*tmp*`, which(dt_boxhead$var == var), "type", value = `<chr>`)
    9.       └─tibble:::`[<-.tbl_df`(...)
   10.         └─tibble:::tbl_subassign(x, i, j, value, i_arg, j_arg, substitute(value))
   11.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   12.             ├─base::withCallingHandlers(...)
   13.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-util_functions.R:494:3'): The `check_spanner_id_unique()` function works properly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
      ▆
   1. └─gt::gt(exibble) at test-util_functions.R:494:2
   2.   └─gt::cols_align(data = data, align = "auto")
   3.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   4.       ├─base::`[[<-`(...)
   5.       └─tibble:::`[[<-.tbl_df`(...)
   6.         └─tibble:::tbl_subassign(...)
   7.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   8.             ├─base::withCallingHandlers(...)
   9.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-utils_render_html.R:18:3'): captioning processes text correctly ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. ├─testthat::expect_null(...) at test-utils_render_html.R:18:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─gt:::create_caption_component_h(exibble %>% gt())
    5. │ └─gt:::dt_options_get_value(data = data, option = "table_caption")
    6. │   └─gt:::dt_options_get(data = data)
    7. │     └─gt:::dt__get(data, .dt_options_key)
    8. ├─exibble %>% gt()
    9. └─gt::gt(.)
   10.   └─gt::cols_align(data = data, align = "auto")
   11.     └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
   12.       ├─base::`[[<-`(...)
   13.       └─tibble:::`[[<-.tbl_df`(...)
   14.         └─tibble:::tbl_subassign(...)
   15.           └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   16.             ├─base::withCallingHandlers(...)
   17.             └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  ── Error ('test-utils_render_html.R:44:3'): bookdown-style crossrefs are added when appropriate ──
  Error in `vectbl_assign(x[[j]], i, recycled_value[[j]])`: DLL requires the use of native symbols
  Backtrace:
       ▆
    1. └─gt (local) expect_caption_eq("test", "(#tab:foo)test") at test-utils_render_html.R:44:2
    2.   ├─gt:::create_caption_component_h(gt(exibble, caption = caption)) at test-utils_render_html.R:3:2
    3.   │ └─gt:::dt_options_get_value(data = data, option = "table_caption")
    4.   │   └─gt:::dt_options_get(data = data)
    5.   │     └─gt:::dt__get(data, .dt_options_key)
    6.   └─gt::gt(exibble, caption = caption)
    7.     └─gt::cols_align(data = data, align = "auto")
    8.       └─gt:::dt_boxhead_edit(data = data, var = column_names[i], column_align = align[i])
    9.         ├─base::`[[<-`(...)
   10.         └─tibble:::`[[<-.tbl_df`(...)
   11.           └─tibble:::tbl_subassign(...)
   12.             └─tibble:::tbl_subassign_row(xj, i, value, i_arg, value_arg, call)
   13.               ├─base::withCallingHandlers(...)
   14.               └─tibble:::vectbl_assign(x[[j]], i, recycled_value[[j]])
  
  [ FAIL 80 | WARN 0 | SKIP 1 | PASS 553 ]
  Error: Test failures
  Execution halted