Calcular días transcurridos y restantes del año en R

Problema

Deseamos calcular el número de días transcurridos y restantes del año, respecto a una fecha u hoy.

Solución

Respecto a una fecha

fecha <- as.Date("2015-03-29")
# Días transcurridos
fecha - as.Date(ISOdate(format(Sys.Date(), "%Y"), 1, 1)) + 1

Time difference of 88 days

# Días restantes
as.Date(ISOdate(format(Sys.Date(), "%Y"), 12, 31)) - fecha

Time difference of 277 days

Respecto a hoy

# Días transcurridos
Sys.Date() - as.Date(ISOdate(format(Sys.Date(), "%Y"), 1, 1)) + 1 

Time difference of 128 days

# Días restantes
as.Date(ISOdate(format(Sys.Date(), "%Y"), 12, 31)) - Sys.Date() 

Time difference of 237 days

Entradas relacionadas

• Calcular días transcurridos y restantes del año