R에 한 줄의 코드가있는 모든 플롯의 그리드를 켤 수 있습니까?

Question

각 플롯 이후에 grid()을 사용하는 대신 r의 모든 플롯에 대해 그리드를 켤 수 있습니까? 그런 다음

myplot <- function(x, ...) { 
    plot(x, panel.first = grid(), ...) 
} 

로 사용 : 같은

plot(1:10) 
grid() 
plot(2:20) 
grid() 
plot(3:30) 
grid() 

Answer 1

으로 래퍼 함수를 ​​작성 나는를 사용

참고 : 제공

xx <- list(a = 1:10, b = 2:20, c = 3:30) 
layout(matrix(1:3, ncol = 3)) 
for (i in seq_along(xx)) { 
    myplot(xx[[i]]) 
} 
layout(1) 

panel.first 인수를 ?plot.default으로 바꾸고 그리드를 앞에 놓고 뒤에 데이터를 놓습니다. 해당 동작을 유지하려면 panel.first을 panel.last으로 변경하십시오.