我有两个矢量要绘制。 in.down是qu的函数。 in.down y轴需要不均匀的间隔。 载体：
options(digits=15)
in.down <-
c(seq(0.1,0.9,0.1),0.99,0.999,0.9999,0.999999,0.9999999,0.99999999,
0.999999999,0.9999999999,0.99999999999,0.9999999999999)
qu<-
c(3750,4114,4430,4745,5087,5482,5977,6672,7902,
12559,17677,22237,27652,28841,29480,29813,29985,30072,30138)
现在我希望in.down向量的第一个序列（0.1-0.9）是一个区间。之后，in.down向量的每个其他值都是一个间隔（一个刻度）。 qu向量的前8个值必须位于第一个区间。
我已尝试过此代码，但这不起作用：
yticks <- c(seq(0, 0.9, 0.9),c(0.99, 0.999999999999))
plot(in.down~qu, ylim=c(0, 0.999999999999))
axis(2, at=yticks, labels=yticks)