Wie mache ich ggplot2-Diagramme schöner?

Ich habe den folgenden Plot mit dem darauf folgenden R-Code generiert:

ggplot(lengths, aes(length, fill = library)) + geom_density(alpha = 0.2) + coord_cartesian(xlim = c(0, 60000)) 

Nun möchte ich die Handlung etwas schöner machen:

Lassen Sie die x-Achse alle 5000 Einheiten (statt alle 20000) anzeigen.Fügen Sie x-Werte zu den drei Peaks hinzu (ca. 3000, 5000 und 35000).

Wie kann ich das machen

aktualisiere als Antwort auf James: