GGIS Sextante scripts in R, implementing several Sampling scheme exploiting Focus Maps