Create print_grid.R