Week 1 Updates

R Scripts and Pictures