tests/testthat/test-code_run_tasks.R

context("Tasks, Code and Run sections")

test_that("tasks, code and run return character vectors.", {
  expect_is(tasks_section("iss", TRUE), "character")
  expect_is(code_section("iss"), "character")
  expect_is(run_section("iss"), "character")
})

Try the RInno package in your browser

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

RInno documentation built on May 1, 2019, 10:52 p.m.