initial commit of my R codes and README markdown