Update and rename map.R to pp.R