data(swissRain)
swissRain$lograin = log(swissRain$rain)
swissRain$elevation = extract(swissAltitude, swissRain)
loglik.GRF(swissRain, lograin ~ elevation,
cov.model="matern", kappa = 2,
phi=10000,sigmasq=0.5^2)
loglik.GRF(swissRain, lograin ~ elevation,
cov.model="matern", kappa = 2,
phi=5000,sigmasq=1)
Run the code above in your browser using DataLab