Added comments
Updated plots and R codes