La doc du paquet Tidyr, très pratique pour de la manipulation de données.

dat <- separate(rawdat, Date.Heure, c("Day", "Hour"), sep=" ")