R/sort.day.strs.R

In haberdashPI/wright.lab.util: A set of utilitiy functions used in our lab.

Defines functions sort.day.strs

Documented in sort.day.strs

sort.day.strs <- function(days,month.codes){
  sortable.days = days
  for(row in 1:nrow(month.codes)){
    sortable.days = sub(month.codes[row,1],month.codes[row,2],sortable.days)
  }
  
  days[order(sortable.days)]
}