Come rendere scale_y_log10 di avere i segni di graduazione a 0.01,0.1,1 in ggplot

Question

ho scritto il seguente codice per rendere la trama

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)) 

La scala automatica interruzioni sono 10^-1.8, 10^-1.6, 10^-1.4 ... 10^-0.4. Mi piacerebbe che il tick più basso fosse 0,01 e il tickmark più alto sia 1.

Grazie per il vostro aiuto.

Modifiche: Ecco come appare la trama dopo aver provato il codice.

Answer 1

Utilizzare le breaks e labels argomenti di scale_y_log10 (leggere su di loro 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() 

Assomiglia:

Quindi per modificare la scala log10 di avere pause personalizzati a 0,01, 0,1 e 1, utilizzare l'argomento breaks:

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

appare come segue:

Infine, se si desidera che le etichette siano anche 0,1, .1 e 1, utilizzare labels argomento:

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

Answer 2

Utilizzare coord_trans() al posto di scala()

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