Update maptool_sample2.R