Learning and retention as a function of affectivity a quantitative approach in terms of affective intensity