# NOT RUN {
data(qspr.data)
ty <- as.matrix(qspr.data[,c(2,5)])
targ.zone <- get_targetzone(targ.min=c(50,9),targ.max=c(200,11),
feat=ty,
min.points=100,max.points=150)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab