nachdem mir hier im Forum zum wiederholten Male sehr gut geholfen wurde, wollte ich heute nochmal die Community um Hilfe bitten.
Es geht um eine Grafik in ggplot. Ich würde gerne die Grafik, welche ich mit folgenden Daten erstellt habe:
Code: Alles auswählen
library(sfsmisc)
library(scales)
library(ggplot2)
x <-runif(301, min=10^(-6), max=10^(-5))
y <- seq(0,30,0.1)
df<- data.frame(x,y);df
names(df) [1]<-"Kf"
names(df) [2]<-"Tiefe"
names(df)
df
Code: Alles auswählen
names(df)
df <- data.frame(df)
ggplot(df, aes(x = Tiefe, y = Kf)) +
geom_line() + geom_point()+
#scale_x_continuous(name =" Tiefe [m]")+
scale_y_log10(breaks = 10^(-5:-6),
labels = trans_format("log10", math_format(10^.x))) +
scale_x_reverse()+
#scale_y_reverse()+
coord_flip()+
geom_point(colour="grey60") +
#stat_smooth(method=loess)+
geom_smooth(span = 0.2)+
theme_minimal()
"Scale for 'y' is already present. Adding another scale for 'y', which will replace the existing scale"
Diese Meldung ist völlig korrekt, denn in der Tat ist die Achsenbeschriftung durch die Einführung der logarithmischen Skala natürlich schon belegt.
Und somit gehen in Richtung der x-Achse die minor ticks verloren.
Aus diesem Grund wollte ich fragen ob es trotzdem möglich ist:
1. Die minor Ticks auf der logarithmische x-Achse wieder ein zu führen
2. Das Überschreiben der Achsenbeschriftung trotzdem zu gestatten
3. Die Grafik in Richtung der x-Achse zu stauchen
Trotz intensiver Recherche sowohl im Netz aber auch in der Literatur konnte ich nichts befriedigendes finden, was die o.g. Probleme löst.
Gibt es denn überhaupt eine Lösung?
Vielen Dank für Eure Hilfe!