Create socialMediaMiningWithR