tests/testthat/test-get_coprimes.R

test_that("get_coprimes examples", {
  expect_equal(get_coprimes(10), c(1, 3, 7, 9))
  expect_equal(length(get_coprimes(100)), numbers::eulersPhi(100))
})

Try the gips package in your browser

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

gips documentation built on April 3, 2025, 9:27 p.m.