tests/testthat/test-wrestling_athlete_rankings.R

test_that("wrestling_athlete_rankings() test", {
  athletes <- wrestling_athlete_rankings("m" , 100)
  expect_type(athletes,"list")
  expect_true(nrow(athletes)  != 0)
})

Try the usportsR package in your browser

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

usportsR documentation built on March 16, 2026, 5:08 p.m.