plots new accept pri, sec and ter arguments instead of x,y,z to avoid confusion. tests, tests, tests

This commit is contained in:
Andreas Gammelgaard Damsbo 2025-04-15 12:04:32 +02:00
commit 652a8ca1b7
No known key found for this signature in database
28 changed files with 3275 additions and 179 deletions

View file

@ -0,0 +1,17 @@
test_that("correlations module works", {
testServer(data_correlations_server, args=list(data = mtcars,cutoff = shiny::reactive(.8)), {
expect_equal(nchar(output$suggest), 281)
expect_equal(class(output$correlation_plot),"list")
expect_equal(length(output$correlation_plot),5)
})
expect_snapshot(
correlation_pairs(data = gtsummary::trial,threshold = .2)
)
expect_snapshot(
sentence_paste(letters[1:8])
)
})