Ich möchte beides habenmonth undday in der x-Achse des Zeitreihendiagramms bei Verwendung vonfacet seit Jahren inggplot2. Mein MWE ist unten:

set.seed(12345)
Date <- seq(as.Date("2010/1/1"), as.Date("2014/1/1"), "week")
Y <- rnorm(n=length(Date), mean=100, sd=1)
df <- data.frame(Date, Y)

df$Year <- format(df$Date, "%Y")
df$Month <- format(df$Date, "%b")
df$Day <- format(df$Date, "%d")

df$MonthDay <- format(df$Date, "%d-%b")


p <- ggplot(data=df, mapping=aes(x=MonthDay, y=Y, shape=Year, color=Year)) + geom_point() +geom_line(aes(group = 1))
p <- p + facet_grid(facets = Year ~ ., margins = FALSE) + theme_bw()
print(p)

Ich habe versucht, die x-Achsenbeschriftungen mit dem folgenden Befehl zu steuern

p + scale_y_continuous() + scale_x_date(labels = date_format("%d-%b"))

Aber es wird die folgende Fehlermeldung ausgegeben.

Error: Invalid input: date_trans works with objects of class Date only