R - ¿cómo declaro un vector de Fecha?

Question

Por ejemplo, he intentado lo siguiente para crear un vector de fechas, duración 5. Ninguno de trabajo:

date(5) 
Date(5) 
vector(5, mode = "Date") 

Esto funciona, pero pregunto si hay un acceso directo?

as.Date(numeric(5)) 

Además, veo que el modo (as.Date ("2011-01-01")) es numérico y entiendo que la estructura de datos subyacente para las fechas es numérico, pero dado que el vector() sólo tiene un argumento de modo y longitud, me parece que es imposible crear un vector de Fecha sin coacción?

Editar
¿Esta es también una solución, excepto por la longitud = 0?

Date = function(length = 0) 
{ 
    newDate = numeric(length) 
    class(newDate) = "Date" 
    return(newDate) 
} 

Answer 1

Se puede utilizar una secuencia, o simplemente basta con añadir:

R> seq(as.Date("2011-07-01"), by=1, len=3) 
[1] "2011-07-01" "2011-07-02" "2011-07-03" 
R> as.Date("2011-07-01") + 0:2 
[1] "2011-07-01" "2011-07-02" "2011-07-03" 
R> 

y que ambos funcionan de la misma manera es un buen ejemplo de por qué la orientación a objetos es agradable para la programación con los datos.

La fecha, como viste, tiene una representación numérica subyacente (de enteros que representan el número de días desde el comienzo del tiempo Unix, también conocido como 1 de enero de 1970) pero también tiene un atributo de clase que hace el formateo, aritmética ... se comportan de la manera que lo hace utilizando el mecanismo de entrada en R.

Editar: Por la misma razón, también puede comenzar con un vector estándar y convertirlo en un objeto Date:

R> x <- 1:3 
R> class(x) <- "Date" 
R> x 
[1] "1970-01-02" "1970-01-03" "1970-01-04" 
R> 

Answer 2

Para inicializar con fechas perdidas en lugar de un montón de 1970-01-01s :

(x = structure(rep(NA_real_, 10), class="Date")) 
# [1] NA NA NA NA NA NA NA NA NA NA 
class(x) 
# [1] "Date"