create maptools_sample3.R