Merge pull request #26 from kenmawer/km-issue_22_v3

Removed export of epi_shift and improved test names

Author: kenmawer

NAMESPACE

@@ -26,8 +26,12 @@ export(smooth_arx_args_list)
 export(smooth_arx_forecaster)
 export(step_epi_ahead)
 export(step_epi_lag)
+<<<<<<< HEAD
+export(step_narm)
+=======
 export(step_epi_naomit)
 export(step_epi_shift)
+>>>>>>> 878eb71132d58400f79ffdd6eb14452f289cbf6a
 import(recipes)
 importFrom(magrittr,"%>%")
 importFrom(rlang,"!!")

R/epi_shift_internal.R

@@ -15,7 +15,6 @@
 #'  order_ for shifting.
 #'
 #' @family row operation steps
-#' @export
 #' @rdname step_epi_ahead
 step_epi_shift <-
   function(recipe,

tests/testthat/test-epi_shift_internal.R

@@ -45,7 +45,7 @@ test_that("Check that epi_lag shifts properly", {
   expect_equal(slope_lag,1)
 })
 
-test_that("Check for non-integer values", {
+test_that("Values for ahead and lag must be integer values", {
   r3 <- epi_recipe(x) %>%
     step_epi_ahead(death_rate, ahead = 3.6) %>%
     step_epi_lag(death_rate, lag = 1.9)
@@ -54,7 +54,7 @@ test_that("Check for non-integer values", {
   )
 })
 
-test_that("Check for duplicate values", {
+test_that("Values for ahead and lag cannot be duplicates", {
   r4 <- epi_recipe(x) %>%
     step_epi_ahead(death_rate, ahead = 7) %>%
     step_epi_lag(death_rate, lag = 7) %>%