tests/testthat/test_align_str_equations.r

test_that("general test case", {
  equations <- c("A ~ some stuff",
                 "another_name ~ more stuff")
  expect_equal(align_str_equations(equations),
               c("           A ~ some stuff", "another_name ~ more stuff"))
})

Try the simDAG package in your browser

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

simDAG documentation built on April 3, 2025, 10:35 p.m.