Create rasterized.R