library(caret)
library(sp)
library(rasterVis)
library(raster)
library(randomForest)
data(predLayer)
data(sampleData)
soils=subset(sampleData,!is.na(sampleData$LL))
dattu=sampleData[,c("LL")]
# \donttest{
Tesrd=predGeo(dattu,predLayer,k=3,90,"lm")
# }
Run the code above in your browser using DataLab