I am trying to use the levelplot function from a command file.
Here is the code:

library(sp)
library(gstat)
library(lattice)

gatherData <- read.table("~/gather.txt", header = TRUE)
grd = makegrid(gatherData$x, gatherData$y, cell.size = 5)
k <- krige(z~x+y, ~x+y, data = gatherData, newdata = grd, nmax = 5)

levelplot(var1.pred~x+y, k, aspect = mapasp(k), main = "Predicted 5m")

It executes fine (it plots up) when I cut and paste to the command 
prompt but it seems to be missed (nothing occurs) when I call the 
source file.
I am using OSX.
Thanks for any help.
Matt
	[[alternative text/enriched version deleted]]


