getDateOffset: getDateOffser

In troyhill/TTFF: A Comparison of Multiple Versions of the Tamiami Trail Flow Formula

Description

Identify the number of days needed to convert between a week starting on "Monday" and the desired start day.

Usage

getDateOffset(dataset, dateColumn = "date", day = "Friday")

Arguments

dataset	input dataframe
dateColumn	name of column with datestamp (Date or POSIX data type)
day	character element specifying the first day of each week (default = "Friday", purely to match SFWMD's arbitrary choice)

Value

a vector of values

Examples

  dateDat        <- data.frame(date = seq.Date(from = Sys.Date() - 100, to = Sys.Date(), by = 1))
  dateDat$dow    <- weekdays(dateDat$date)
  dateDat$week.R <- format(as.Date(dateDat$date), "%Y-%W")
  head(dateDat, 10)
  
  dateOffset        <- getDateOffset(dateDat, day = "Friday")
  dateDat$week.new  <- format(as.Date(dateDat$date) - dateOffset, "%Y-%W")
  head(dateDat, 10)
  

troyhill/TTFF documentation built on Aug. 9, 2021, 6:35 p.m.