I am trying to recreate the charts in this book using ggplot2. The data I am using is at the bottom of the post from a dput. It is available from the publisher\
dput
You should use scale_x_datetime since you have POSIXct :
scale_x_datetime
POSIXct
scale_x_datetime(labels=date_format("%Y %H:%M"))
Or convert you Date variable to a Date ( without time part)
chartout$Date <- as.Date(chartout$Date)
And I would use this format :
scale_x_date(labels = date_format("%m %b")) +