adding only sent...AFINN.R