tests/testthat/test-rtfn.R

test_that("rtfn-test", {
  df<- rtfn(500,1,5)
  x<- df$x
  expect_equal(x, df$x)
})

Try the genfrn package in your browser

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

genfrn documentation built on June 22, 2024, 7:21 p.m.