library(caret)
library(sp)
data(sampleData)
soil1=sampleData[,c("LL")]
soil1=subset(soil1,!is.na(soil1$LL))
overlay.ov=over(soil1, predLayer)
soil1$dem=overlay.ov$dem
soil1$texture=overlay.ov$texture
soil1$depthcodes=overlay.ov$depthcodes
soil2=soil1@data[,c("LL","dem","texture","depthcodes")]
# \donttest{
regmodelSuit(soil2,LL,dem,texture,depthcodes)
# }
Run the code above in your browser using DataLab