Recommend jokes using the UBCF recommendation system from R