tests/testthat/test_walkingtest.R

#Test basic walking functions

context("test basic walking functions")

test_that("test Naismithwalkspeed",{
  expect_equal(round(naismithwalkspeed(40,4),6),4.285714)


})
DrIanPhilips/walkcyclecalcs documentation built on June 28, 2019, 9:06 p.m.