tests/testthat/test_amoritization.R

context("Testing amoritization")

test_that("Number of months determined is not correct", {
  ss <- amoritization(50000,3.9,821,150)
  expect_equal(ss,57)
})
jtuttle7/LearnFunctions documentation built on May 25, 2019, 6:25 p.m.