R assignment 3 & Entropy Project