ggplot2 X-Achse nach oben verschieben (Schnittpunkt mit umgekehrter Y-Achse bei 0)

Ich möchte eine Figur machen, bei der die y-Achse und die x-Achse bei y = 0 umgekehrt sind. Die y-Achse wurde mit scale_y_reverse umgekehrt, aber die x-Achse blieb unten.

p <- ggplot(df, aes(x= conc, y=depth, group=factor(stn), color=factor(stn)))+
geom_point(shape=1)+
geom_path(alpha=0.5)+
scale_y_reverse(limits=(c(20,0)), expand=c(0,0))+   
scale_x_continuous(expand=c(0,0))

Ich habe den Code von ausprobiertdieser Beitrag wie unten, aber es hat nicht funktioniert.

p + 
scale_x_continuous(guide = guide_axis(position = "top")) + 
scale_y_continuous(guide = guide_axis(position = "right"))

Ich brauche keine zwei x-Achsen, sondern bewege mich einfach von unten nach oben.

Antworten auf die Frage(2)

Ihre Antwort auf die Frage