¿Alguien puede decirme por qué R da tal resultado a continuación?

> as.POSIXct("2013-01-01 08:00")
[1] "2013-01-01 08:00:00 HKT"
> as.Date(as.POSIXct("2013-01-01 08:00"))
[1] "2013-01-01"
> as.POSIXct("2013-01-01 07:00")
[1] "2013-01-01 07:00:00 HKT"
> as.Date(as.POSIXct("2013-01-01 07:00"))
[1] "2012-12-31"

No deberia ser2013-01-01 después de convertirPOSIXct aDate para2013-01-01 07:00, ¿hay alguna manera de cambiar el punto de corte de08:00 a00:00?

Actualización # 1

Encontré que lo siguiente puede solucionar mi problema, pero de una manera menos ordenada

> as.Date(as.character(as.POSIXct("2013-01-01 07:00")))
[1] "2013-01-01"