Create plot_heat_map.R