added R files and png images