add R-script
update README and CodeBook