Final draft

Added comments to first r chunk, added analysis at the end