tests/testthat/test-seq_k.R

context("Index vector of lagrange multipliers of dimension k")

test_that("Number of lagrange multipliers are correct", {
  expect_equal(seq_k(1), seq_len(2))
  expect_equal(seq_k(2), 3:5)
  expect_equal(seq_k(3), 6:9)
})

Try the RCM package in your browser

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

RCM documentation built on Nov. 8, 2020, 5:22 p.m.