https://thinkr.fr/abcdr/comment-utiliser-apply-dans-r/