test-similarDays.R

   1 context("Get similar days")
   2
   3 itestthat("getSimilarDaysIndices works as expected",
   4 {
   5     getSimilarDaysIndices(index, data, limit, same_season, days_in=NULL)
   6     #...
   7 })
   8 {
   9     index = dateIndexToInteger(index, data)
  10
  11 testthat("getConstrainedNeighbs works as expected",
  12 {
  13     .getConstrainedNeighbs(today, data, fdays, min_neighbs=10, max_neighbs=12)
  14     #...
  15 })
  16