dwww Home | Show directory contents | Find package
context("functional sequences") test_that("fseq functions work", { a <- . %>% cos %>% sin %>% tan b <- function(x) tan(sin(cos(x))) expect_that(a(1:10), is_identical_to(b(1:10))) })
Generated by dwww version 1.15 on Mon Jun 24 15:19:05 CEST 2024.