plot1 through plot4 and R files