R plots - fixing