Create map.r