tests/testthat/test-freduce.R

test_that("freduce() supports long lists (kcf-jackson/sketch#5)", {
  fns <- rep(list(identity), 1000)
  expect_equal(freduce(1, fns), 1)
})

Try the magrittr package in your browser

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

magrittr documentation built on March 30, 2022, 9:07 a.m.