Scale x continuous in ggplot