在R图上添加自定义刻度线

Rub*_*ens 16 plot r

我正在绘制一些数据的cdf,并且我在"x"轴上添加了对数刻度.刻度线间距与我想要的完全一样,但我希望能够在特定点上添加 一些刻度线.

我不想改变蜱的分布在我的情节,从n by n到m by m,我想简单地拥有,从蜱中n by n,一些进一步的刻度标记上的一些价值观.

我想让它反映在轴x和y轴上,这样我就可以在整个图形中将网格放入这些新标记中.

到目前为止,我有图形和网格 - 我不介意将网格放在图形后面,我只是想添加一些自定义标记.

# Cumulative Distribuition
pdf("g1_3.pdf")

plot(x = f$V2, y = cumsum(f$V1), log = "x", pch = 3,
     xlab = "Frequency", ylab = "P(X <= x)",
     panel.first = grid(equilogs = FALSE))

axis(1, at = c(40, 150))
abline(h = 0.6, v = 40, col = "lightgray", lty = 3)
abline(h = 0.6, v = 150, col = "lightgray", lty = 3)

dev.off()
Run Code Online (Sandbox Code Playgroud)

更新:到目前为止我的图表:

在此输入图像描述

Rub*_*ens 15

考虑到初始脚本和@BenBolker给出的提示,我不得不使用:

axis(side = 1, at = c([all the ticks you want]))
Run Code Online (Sandbox Code Playgroud)

为了ticks在图表中添加.这是最终结果:

# Cumulative Distribuition
pdf("g1_3.pdf")

plot(x = f$V2, y = cumsum(f$V1), log = "x", pch = 3,
     xlab = "Frequency", ylab = "P(X <= x)", axes = FALSE)

ticks = c(1, 5, 10, 40, 150, 500, 1000)
axis(side = 1, at = ticks)
axis(side = 2)

abline(h = seq(0, 1, 0.2), v = ticks, col = "lightgray", lty = 3)
box()
Run Code Online (Sandbox Code Playgroud)

我试图生成的图表的最终结果