added assignment3 scripts for R course