ejemplo_fechas

R Dates

##convierte un frame con fechas a dias de la semana

##definicion de funciones
diaSemanaDesdeDF <- function(df) {

  apply(df, MARGIN = 1, FUN = diaSemanaDesdeFila)

}

diaSemanaDesdeFila <- function(fila){
  # procesar la fila, que es un vector de 3 elementos
  year=fila[1]
  year
  month =fila[2]
  day=fila[3]
  fecha = as.Date(paste(year, month, day, sep='-'))
  diaSemana<- weekdays(fecha)
  diaSemana
  # Devolver un string “L”, “M”, “X”, “J”, “V”, “S” o “D”
}


## FRAME CON FECHAS
fechas <- data.frame(
    anio = c (2019, 2020, 2020,1969),
    mes =  c(1,2,3,6),
  day = c(10, 15, 20,25)
)

diaSemanaDesdeDF(fechas)

## [1] "jueves"    "sábado"    "viernes"   "miércoles"