diff --git a/NEWS.md b/NEWS.md index 1d5bfa4..8acf600 100644 --- a/NEWS.md +++ b/NEWS.md @@ -2,7 +2,7 @@ # teckfish 0.2.1 -- Set lower default `min_length = 122` for `gsdd_cf()`. +- Set lower default `min_length = 120` for `gsdd_cf()`. # teckfish 0.2.0 diff --git a/R/gdd.R b/R/gdd.R index 618a236..d397c32 100644 --- a/R/gdd.R +++ b/R/gdd.R @@ -12,7 +12,7 @@ gdd <- function( x, end_date = as.Date("1972-09-30"), - min_length = 61, + min_length = 60, msgs = TRUE ) { chk_whole_number(min_length) diff --git a/R/gsdd-cf.R b/R/gsdd-cf.R index 073f084..98c585b 100644 --- a/R/gsdd-cf.R +++ b/R/gsdd-cf.R @@ -13,7 +13,7 @@ gsdd_cf <- function( x, ignore_truncation = FALSE, - min_length = 122, + min_length = 120, msgs = TRUE ) { lifecycle::deprecate_soft("0.1.2", "gsdd_cf()", with = "gsdd::gsdd_vctr()") diff --git a/R/gsdd.R b/R/gsdd.R index de796d1..06b5823 100644 --- a/R/gsdd.R +++ b/R/gsdd.R @@ -11,7 +11,7 @@ #' gsdd(gsdd::temperature_data) gsdd <- function( x, - min_length = 122, + min_length = 120, msgs = TRUE ) { chk_whole_number(min_length) diff --git a/man/gdd.Rd b/man/gdd.Rd index 0197e64..a563124 100644 --- a/man/gdd.Rd +++ b/man/gdd.Rd @@ -4,7 +4,7 @@ \alias{gdd} \title{Calculate Growing Degree Days (GDD)} \usage{ -gdd(x, end_date = as.Date("1972-09-30"), min_length = 61, msgs = TRUE) +gdd(x, end_date = as.Date("1972-09-30"), min_length = 60, msgs = TRUE) } \arguments{ \item{x}{A data frame with two columns \code{date} and \code{temperature}. diff --git a/man/gsdd.Rd b/man/gsdd.Rd index 61f273b..9e50cbd 100644 --- a/man/gsdd.Rd +++ b/man/gsdd.Rd @@ -4,7 +4,7 @@ \alias{gsdd} \title{Calculate Growing Season Degree Days (GSDD)} \usage{ -gsdd(x, min_length = 122, msgs = TRUE) +gsdd(x, min_length = 120, msgs = TRUE) } \arguments{ \item{x}{A data frame with two columns \code{date} and \code{temperature}. diff --git a/man/gsdd_cf.Rd b/man/gsdd_cf.Rd index f2eade1..be69fc3 100644 --- a/man/gsdd_cf.Rd +++ b/man/gsdd_cf.Rd @@ -4,7 +4,7 @@ \alias{gsdd_cf} \title{Calculate Growing Season Degree Days (GSDD)} \usage{ -gsdd_cf(x, ignore_truncation = FALSE, min_length = 122, msgs = TRUE) +gsdd_cf(x, ignore_truncation = FALSE, min_length = 120, msgs = TRUE) } \arguments{ \item{x}{A numeric vector of the