我正在尝试创建一个图,其中 x 轴具有概率比例,y 轴是 log-10 比例。我将从我的数据开始,可以在此处找到文本文件:http: //m.uploadedit.com/b018/1374626091664.txt
正如您从数据中看到的那样,我想根据“站点”因素绘制两个数据系列。好吧,当我去绘制数据时,我自然会使用scale_x_continuous
withtrans='probit'
选项来生成概率图比例。我还生成了一个用于概率轴的中断向量,命名为ybreaks
:
ybreaks <- c(1,2,5,10,20,30,40,50,60,70,80,90,95,98,99,99.5,99.9)/100
ggplot(Site1A, aes(x=Prob, y=Volume))+
geom_point(aes(colour=factor(Site)))+
geom_line(aes(colour=factor(Site)))+
scale_x_continuous(trans='probit', minor_breaks=ybreaks)+
scale_y_log10(labels = comma, breaks=c(.001,.01,.1,1,10,100))+
labs(x="Exceedance Probability", y="Volume (cubic feet)")+
scale_colour_discrete(name="Location", breaks=c("X1Ain","X1Aout"), labels=c("In","Out"))+
theme(panel.background = element_rect(fill='#FFFFFF', colour = 'gray'),
axis.text.y = element_text(colour="black", size=18),
axis.text.x = element_text(colour="black", size=12),
axis.title.y = element_text(size=24),
axis.title.x = element_text(size=24, vjust=.1),
legend.text=theme_text(size=23),
legend.title=theme_text(size=23),
legend.title=element_text())
代码图如下所示:
如您所见,我试图让概率轴的小网格线与实际中断对齐,但它似乎缩小到某个未知的规模。此外,对数轴的刻度关闭(我指定的中断与 log10 刻度的轴间隔不对齐)。我该如何纠正?感谢您提供的任何意见。