Как извлечь правильную дату из элемента POSIXct?

Question

Как я могу получить правильную дату из первого столбца в моем коде?

test <- data.frame(posixdate = c("2013-05-01 00:59:00", "2013-05-01 01:59:00", "2013-05-01 02:59:00", "2013-05-01 03:59:00")) 
test$posixdate <- as.POSIXct(test$posixdate, format="%Y-%m-%d %H:%M:%S") 
test$date <- as.Date(test$posixdate) 

Приведенные выше результаты кода в:

posixdate   date 
1 2013-05-01 00:59:00 2013-04-30 
2 2013-05-01 01:59:00 2013-04-30 
3 2013-05-01 02:59:00 2013-05-01 
4 2013-05-01 03:59:00 2013-05-01 

Первые две даты не являются правильными. Что я сделал не так? Если as.Date() не является правильной функцией, как я могу получить дату (без часов, минут, секунд) в качестве альтернативы?

Заранее благодарен!

Answer 1

Попробуйте с lubridate пакета. Меня устраивает.

library(lubridate) 

as.Date(ymd_hms(test$posixdate)) 

[1] "2013-05-01" "2013-05-01" "2013-05-01" "2013-05-01" 

Answer 2

проблема часовой пояс,

попробовать свой часовой пояс (вероятно, не GMT)

test$date2 <- as.Date(test$posixdate, "GMT") 

и читать this пост