Caros, tenho um data frame que tem colunas de classe as.Date. Eu tô fazendo uma função para uma tabela eu gostaria que o R considerasse a classe date como factor ou numeric quando executasse a função.

a<- data.frame(Date.end = as.Date(seq(from=as.POSIXct('2012-06-26', tz="UTC"), 
                                      to=as.POSIXct('2012-10-06', tz="UTC"), by="day")))


Aqui eu reproduzo parte da função que converte factor para numeric. Não consegui achar um forma de fazer o mesmo com Date. 

if (is.factor(x[[i]]) || is.logical(x[[i]])) {
                x[[i]] <- as.numeric(x[[i]])
                rownames(tabela)[i] <- paste(rownames(tabela)[i],
                                            "!#", sep = " ")
}

Alguém tem alguma dica?



--
"Small steps toward a much better world"

\begin{signature}
Daniel Marcelino
Land Phone 1+514 343 6111 #3799
3200 Jean Brillant,  Office C5071
Montreal, QC; H3T 1N8
Canada
\end{signature}