Вы можете отключить метки по умолчанию с помощью xaxt="m"
, а затем использовать функцию axis()
, чтобы рисовать любые метки, которые вам нравятся.Например,
coz <- function(x) {cos(x)}
plot(coz, 0 , 2*pi, bty="n", lty=3, xaxt="n")
axis(1, at=c(0,pi/2,pi,3*pi/2, 2*pi),
labels=expression(0,pi/2,pi,3*pi/2, 2*pi))
![enter image description here](https://i.stack.imgur.com/tjQAx.png)