Jak scale_y_log10 mieć znaków podziałki na 0.01,0.1,1 w ggplot

Question

Napisałem następujący kod do fabuły

pd<- position_dodge(.2) # # move them .05 to the left and right 
pm25 <- ggplot(data, aes(x=CombSEG, y=conc,shape=A,color=A, lty=A,  group=A)) + 
geom_point() + 
geom_line() + 
geom_errorbar(aes(ymin=conc-se, ymax=conc+se), 
       width=.1, position=pd) + 
theme_bw()+ 
limits(c(0 
scale_y_log10(breaks=c(0.01,0.1,1),labels=c(0.01,0.1,1)) 

Automatyczna skala przerwy są 10^-1,8, 10^-1.6, 10^-1.4 ... 10^-0,4. Chciałbym, aby najniższy tik był równy 0,01, a najwyższy tickmark to 1.

Dziękuję za pomoc.

Edycja: Oto jak wygląda fabuła po tym, jak wypróbowałem twój kod.

Answer 1

Użyj breaks i labels argumenty scale_y_log10 (czytaj o nich here).

# make up some sample data 
df <- data.frame(x=1:100,y=10^-(2*runif(100))) 
ggplot(df,aes(x=x,y=y)) + geom_point() + scale_y_log10() 

wygląda następująco:

Następnie zmodyfikować skalę log10 mieć niestandardowe przerwy w .01, .1 i 1, korzystają z breaks argument:

ggplot(df,aes(x=x,y=y)) + geom_point() + scale_y_log10(breaks=c(.01,.1,1)) 

wygląda następująco:

Na koniec, jeśli chcesz, aby etykiety miały również wartość 0,1, .1 i 1, użyj labels Argument:

ggplot(df,aes(x=x,y=y)) + geom_point() + 
      scale_y_log10(breaks=c(.01,.1,1),labels=c(.01,.1,1)) 

Answer 2

Stosować coord_trans() zamiast skali()

df <- data.frame(x=1:100,y=10^-(2*runif(100))) 
ggplot(df,aes(x=x,y=y)) + geom_point() + coord_trans(y = "log10")