tests/testthat/testOne.R

library('replyr')

context("Excercise Operations")

test_that("testOne: Works As Expected", {
  d <- data.frame(x = c(1, 2))
  n <- replyr_nrow(d)
  expect_true(n == 2)
})
WinVector/replyr documentation built on Oct. 22, 2020, 8:07 p.m.