Added 4 R files that generates 4 image files