added new figures
updated readme
added R script