first commit

first commit, plots and R codes