# NOT RUN {
groups <- ipfGroup(ipftrain, LONGITUDE, LATITUDE)
model <- ipfProb(ipftrain[, 1:168], ipftrain[, 169:170], groups = groups)
# }
# NOT RUN {
model <- ipfProb(ipftrain[, 1:168], ipftrain[, 169:170], k = 9, delta = 10)
# }
# NOT RUN {
# }
Run the code above in your browser using DataCamp Workspace