La fonction lapply() permet d’appliquer une fonction à chaque élément d’une liste.
Le premier argument est une liste sur laquelle on veut appliquer la fonction placée en deuxième argument (mean, sum, sd, function(x)…).
x <- list(a = 1:7, b = runif(n = 5, min = 10, max = 20), booleen = c(TRUE,FALSE,FALSE,TRUE))
y<-lapply(x,mean)
#de manière plus générale, cela équivaut à :
y<-apply(x,function(x) mean(x))
# on ajoute function(x) devant une les fonctions non-prédéfinies dans R
z<-sapply(x,mean)
# la fonction sapply est équivalente à lapply
# mais lapply retourne une liste tandis que la fonction sapply retourne un vecteur numérique, une matrice ou quand cela n'est pas possible, une liste.