Я написал следующий код, чтобы сделать сюжет
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))
Автоматические разрывы шкалы составляют 10 ^ -1,8, 10 ^ -1,6, 10 ^ -1,4... 10 ^ -0,4. Мне бы хотелось, чтобы самый низкий тик был равен 0,01, а максимальная отметка - 1.
Благодарим вас за помощь.
Редактирование. Вот как выглядит сюжет после того, как я попробовал свой код.