Updated loadData.R and added plot3.R