diff --git a/tests/testthat/test-pagination_table.R b/tests/testthat/test-pagination_table.R index 43a7119..14ff69b 100644 --- a/tests/testthat/test-pagination_table.R +++ b/tests/testthat/test-pagination_table.R @@ -84,7 +84,7 @@ main_footer(res) <- "main footer" prov_footer(res) <- "prov \nfooter that has a lot of \nnew \nlines" top_left(res) <- "SOME TOPLEFT" table_inset(res) <- 5 -rtables::fnotes_at_path( +fnotes_at_path( res, c(make_row_df(res)$path[[7]]), c("B: Placebo") # nolint diff --git a/tests/testthat/test-table_pkct01.R b/tests/testthat/test-table_pkct01.R index ab158b9..071bb08 100644 --- a/tests/testthat/test-table_pkct01.R +++ b/tests/testthat/test-table_pkct01.R @@ -127,7 +127,7 @@ testthat::test_that("Specific PKCT01 features are present", { testthat::expect_equal(sum(sapply(string_res, grepl, pattern = "NE")), 3L) # Checking significative digits (DISCLAIMER: this is an hack and is NOT well supported) - mean_vals <- rtables::cell_values(result, + mean_vals <- cell_values(result, rowpath = NULL, colpath = c("multivars", "AVAL._[[2]]_.") ) %>%