Nice look of plot 4 (png & R script)