R plots nicer -Nik