Test File 4 test-fm_generate_graphs.R
Summary
Number of test(s) : 2
Number of expectation(s) : 8
Number of successful expectation(s) : 2
Number of failed expectation(s) : 0
Number of errored expectation(s) : 0
Number of expectations with warning(s) : 0
Number of validated skip expectation(s) : 0
Number of skipped expectation(s) : 6
Details
| Test | Description | Expectation | Result | Location | Test_time |
|---|---|---|---|---|---|
| fm_fit_model works | NA (was skipped) | # Update expected outputs here | 🔄 Skipped | test-fm_generate_graphs.R#30 | NA (was skipped) |
| fm_fit_model works | NA (was skipped) | expect_true(file.exists(file.path(output_inst_dir, paste0(“part3_output_”, test_resolution , “.rds”)))) | 🔄 Skipped | test-fm_generate_graphs.R#57 | NA (was skipped) |
| fm_fit_model works | NA (was skipped) | expect_true(file.exists(file.path( | 🔄 Skipped | test-fm_generate_graphs.R#60 | NA (was skipped) |
| fm_generate_graphs works | Testing the result of fm_generate_graphs() is a list |
expect_true(object = inherits(x = fm_graph_results, what = “list”)) | ✅ Success | test-fm_generate_graphs.R#73 | 2023-04-13 12:24:13 |
| fm_generate_graphs works | Testing class of the pred plot returned by fm_generate_graphs() |
expect_s3_class( object = fm_graph_results[[“pred_plot”]], class = c(“gg”, “ggplot”) ) | ✅ Success | test-fm_generate_graphs.R#77 | 2023-04-13 12:24:13 |
| fm_generate_graphs works | NA (was skipped) | # expected_outputs <- readr::read_rds( | 🔄 Skipped | test-fm_generate_graphs.R#86 | NA (was skipped) |
| fm_generate_graphs works | NA (was skipped) | # expect_equal( | 🔄 Skipped | test-fm_generate_graphs.R#93 | NA (was skipped) |
| fm_generate_graphs works | NA (was skipped) | # expected = expected_outputs, | 🔄 Skipped | test-fm_generate_graphs.R#95 | NA (was skipped) |