<div dir="ltr"><br><div class="gmail_extra"><div class="gmail_extra"><font face="monospace, monospace">require(geoR)</font></div><div class="gmail_extra"><font face="monospace, monospace">grid <- pred_grid(c(-55,-50),c(-25,-22), by=0.5)</font></div><div class="gmail_extra"><font face="monospace, monospace">plot(grid)</font></div><div class="gmail_extra"><font face="monospace, monospace">x <- unique(grid[,1]); </font><span style="font-family:monospace,monospace">nx <- length(x)</span></div><div class="gmail_extra"><font face="monospace, monospace">y <- unique(grid[,2]); </font><span style="font-family:monospace,monospace">ny <- length(y)</span></div><div class="gmail_extra"><font face="monospace, monospace">z <- matrix(runif(nx*ny, 10,50), nx, ny)  </font></div><div class="gmail_extra"><font face="monospace, monospace">image(x,y,z)</font></div></div><div class="gmail_extra"><br clear="all"><div><div class="gmail_signature"><div dir="ltr">Éder Comunello <<a href="mailto:comunello.eder@gmail.com" target="_blank">c</a><a href="mailto:omunello.eder@gmail.com" target="_blank">omunello.eder@gmail.com</a>> <br>Dourados, MS - [22 16.5'S, 54 49'W]<br></div></div></div>
<br><div class="gmail_quote"><br></div></div></div>