Formatting geom_label dates
<p>Is there a way to format the dates printed by <code>geom_label</code> in <code>ggplot2</code> beyond their raw value? In the example below the dates are printed as "1910-01-01". However, say I wanted to just print the month and day and also have the month as a text value. Anyone have any ideas how I'd go about doing that?</p>

<pre><code>library(ggplot2)

df &lt;- data.frame(
  x=1:5,
  y=runif(5,10,40),
  Date=seq(as.Date("1910/1/1"), as.Date("1914/1/1"), "years"))


ggplot(df, aes(x=x, y=y)) +
  geom_point() +
  geom_label(aes(label=Date))
</code></pre>