R Code for some analysis of metacritic data