DateTest

library(lubridate)

 次のパッケージを付け加えます: ‘lubridate’ 

 以下のオブジェクトは ‘package:base’ からマスクされています: 

     date, intersect, setdiff, union 

dfDateTest$Time <- hour(dfDateTest$Date) + minute(dfDateTest$Date)/60

library(ggplot2)
ggplot(dfDateTest, aes(x = Time, y = Dose)) +
  geom_point()