create new file maptools_sample.R