mirror of
https://github.com/agdamsbo/FreesearchR.git
synced 2026-06-19 12:37:30 +02:00
plots new accept pri, sec and ter arguments instead of x,y,z to avoid confusion. tests, tests, tests
This commit is contained in:
parent
e463fa0670
commit
652a8ca1b7
28 changed files with 3275 additions and 179 deletions
17
tests/testthat/test-correlations-module.R
Normal file
17
tests/testthat/test-correlations-module.R
Normal 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])
|
||||
)
|
||||
|
||||
})
|
||||
|
||||
Loading…
Add table
Add a link
Reference in a new issue