Update fullProject1.R