Функция R persp (): есть ли способ создать масштаб журнала?

Question

Можно ли поместить в лог-журнал следующее?

x <- seq(-10, 10, length.out = 50)  
y <- x  
rotsinc <- function(x,y) {
  sinc <- function(x) { y <- sin(x)/x ; y[is.na(y)] <- 1; y }  
  10 * sinc( sqrt(x^2+y^2) )  
}
persp(x,y,z,ticktype = "detailed")