ggplot2 - wie man geom_rug bewegt, um das Überschreiben von Punkten zu vermeiden

Question

Ich habe ein einfaches Streudiagramm mit ggplot2 erstellt und einen Teppich mit geom_rug auf der y-Achse (linke Seite) hinzugefügt, jedoch versteckt der Teppich ein paar Punkte. Ich habe versucht, position_dodge, position_jitterdodge und hjust, um den Teppich zu bewegen und diese Punkte sichtbar zu machen, aber es gab nicht das gewünschte Ergebnis. Ich kann den Teppich nicht auf die rechte Seite der Handlung bewegen, da es auch hier versteckte Punkte gibt.

Gibt es eine Möglichkeit, den Teppich auf der anderen Seite der y-Achse außerhalb des Diagramms zu bewegen? Hier

ist einige Beispiel-Code:

data("midwest", package = "ggplot2") 
ggplot(midwest, aes(x=area, y=poptotal)) + geom_point(alpha=0.8)+ 
geom_rug(aes(x=NULL, y=poptotal), alpha=0.8) 

Answer 1

ich das Problem, indem man einfach die Erweiterung der X-Achse Grenzen gelöst, mit

scale_x_discrete(expand = c(0.01,0.01))