R/utils.R

Defines functions day_diff year_diff pretty_rownames

#' Make character vector pretty
pretty_rownames = function(rnames){
  rnames = gsub('^`', '', rnames)
  rnames = gsub('`$', '', rnames)
  rnames = gsub('`', ':', rnames)
  rnames
}


year_diff = function(date1, date2){
  day_diff(date1, date2) / 365.25
}

day_diff = function(date1, date2){
  as.numeric(difftime(as.Date(date1), as.Date(date2), units = 'days'))
}
christophM/interpretable-ml-book documentation built on Aug. 3, 2024, 11:05 p.m.