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"))
})

Try the SparseSignatures package in your browser

Any scripts or data that you put into this service are public.

SparseSignatures documentation built on Nov. 8, 2020, 4:55 p.m.