# Fatto il grafico di una funzione per cui ho tracciato
# una griglia con  axTicks (grafico a sinistra)
f <- function(x) (x-10)^2-20
plot(f,8,12,asp=1, lwd=2)
abline(v=axTicks(1), h=axTicks(2), col="blue", lty=2)
# posso infittire la griglia in certe zone, ad es. con:
abline(v=seq(11,12,1/5), h=seq(-19,-17,1/2),lty=3)