축 명령을 사용하지 않고 y 축을 오른쪽에 직접 그리는 방법은 무엇입니까?

Question

나는 시계열의 끝에서 예측을 계획하고 있으므로 경로의 예상되는 부분에 더 가깝기 때문에 오른쪽에 y 틱이있는 것이 더 편리하다고 생각합니다.

이 일을 피할 수있는 방법이 있나요 :

set.seed(1) 

x <- 1:10 
y <- sample(1:15, 10) 

par(mar = c(5.1, 2.1, 4.1, 4.1)) 
plot(x, y, yaxt="n", ylab=NA) 
axis(4) 
mtext("my y", 4, line = 2) 

어떤 제안을 환영합니다.

Answer 1

원하는 기능을 수행하면됩니다.

이 같은 뭔가

시작을 원하는 경우 다음 더 그것을 사용자 정의, 예를 들어, 축에 그려진되는 측면을 통해 더 제어 축 수/배치 틱, 또는 무엇이든 :

myPlot <- function(..., yaxt = "n", ylab = NA) { 
    plot(x, y, yaxt = "n", ylab = NA) 
    axis(4) 
    mtext(ylab, 4, line = 2) 
} 

myPlot(x, y, ylab="my y")