From 31a4286d79c78e2385a137ff974113247f06b699 Mon Sep 17 00:00:00 2001 From: Adam Black Date: Wed, 6 Sep 2023 15:03:44 -0400 Subject: [PATCH] remove deprecated endpoint functions --- CRAN-SUBMISSION | 6 +++--- R/window.R | 30 +----------------------------- 2 files changed, 4 insertions(+), 32 deletions(-) diff --git a/CRAN-SUBMISSION b/CRAN-SUBMISSION index dd678a8f..0528d496 100644 --- a/CRAN-SUBMISSION +++ b/CRAN-SUBMISSION @@ -1,3 +1,3 @@ -Version: 2.1.0 -Date: 2023-08-14 16:10:03 UTC -SHA: 7ae41403a936fe50e2cb12052df4a3b99e6022b1 +Version: 2.0.6 +Date: 2023-09-06 18:37:34 UTC +SHA: 71f1dd8bb419ec22cb023ee8502417a1bb82ccef diff --git a/R/window.R b/R/window.R index c5ff3fa2..f71fccb0 100644 --- a/R/window.R +++ b/R/window.R @@ -90,39 +90,11 @@ continuousObservation <- function(priorDays = 0L, postDays = 0L) { } -#Depreciated Endpoint functions -#' #' A function to offset the number of days relative to index -#' #' @param days a number specifying the number of days to offset from index where -#' #' an event may be observed. In this function a negative number means days before index -#' #' and a postive number means days after index. -#' #' @export -#' offset <- function(days) { -#' coeff <- dplyr::if_else(sign(days) == 1, "after", "before", "before") -#' new("Endpoint", -#' days = as.integer(abs(days)), -#' coeff = coeff) -#' } -#' -#' #' Function looking at all time before an event -#' #' @export -#' allDaysBefore <- function() { -#' new("Endpoint", -#' days = "all", -#' coeff = "before") -#' } -#' -#' #' Function looking at all time after an event -#' #' @export -#' allDaysAfter <- function() { -#' new("Endpoint", -#' days = "all", -#' coeff = "after") -#' } - ## EventWindow --------------------- #' Function creates an event window where the event starts +#' #' @param a the left side of the event window #' @param b the right side of the event window #' @param index specifying what part of the index we start looking for events