From effe496b0ac0fb3aa811a2f39d747d71c093f231 Mon Sep 17 00:00:00 2001 From: James McMahon Date: Mon, 16 Dec 2024 17:08:18 +0000 Subject: [PATCH] Delete R/rename.R --- R/rename.R | 53 ----------------------------------------------------- 1 file changed, 53 deletions(-) delete mode 100644 R/rename.R diff --git a/R/rename.R b/R/rename.R deleted file mode 100644 index 0a481e1..0000000 --- a/R/rename.R +++ /dev/null @@ -1,53 +0,0 @@ -#' Functions renamed in phsmethods 0.2.1 (Dec 2021) -#' -#' @description -#' `r lifecycle::badge('deprecated')` -#' -#' phsmethods 0.2.1 renamed a number of functions -#' to improve code clarity. The old functions no longer -#' work and will error. At the next update they will be -#' removed completely. -#' -#' * `postcode()` → `format_postcode()` -#' * `age_group()` → `create_age_groups()` -#' * `fin_year()` → `extract_fin_year()` -#' -#' @keywords internal -#' @name rename -#' @aliases NULL -#' @returns `r lifecycle::badge('deprecated')` -NULL - -#' @rdname rename -#' @export -postcode <- function(x, format = c("pc7", "pc8")) { - lifecycle::deprecate_stop("0.2.1", "postcode()", "format_postcode()") - - return(format_postcode(x = x, format = format)) -} - -#' @rdname rename -#' @export -age_group <- function(x, - from = 0, - to = 90, - by = 5, - as_factor = FALSE) { - lifecycle::deprecate_stop("0.2.1", "age_group()", "create_age_groups()") - - return(create_age_groups( - x = x, - from = from, - to = to, - by = by, - as_factor = as_factor - )) -} - -#' @rdname rename -#' @export -fin_year <- function(date) { - lifecycle::deprecate_stop("0.2.1", "fin_year()", "extract_fin_year()") - - return(extract_fin_year(date = date)) -}