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 July 24, 2024, 12:33 p.m.