Create hrr_map.R