added R skript and PDFs for group 2