tests/testthat/test_algorithm.R

context("SparseSignatures")

data("nmf_LassoK_example")
test_that("SparseSignatures produces correct output", {
    expect_equal(names(nmf_LassoK_example),c("alpha","beta","starting_beta","best_loglik","loglik_progression"))
})
danro9685/SparseSignatures documentation built on May 9, 2024, 11:11 a.m.