tests/testthat/test-myseq_n.R

test_that("mysq_n output", {
  x<- c(2, 4, 3)
  n<-4
  expect_identical(myseq_n(x = c(2, 4, 3), n = 4),2.5)
})
yanzhang7559/hw04pyanzhang7559resub documentation built on Oct. 3, 2020, 12:48 a.m.