Utiliser lapply avec votre propre fonction

Comme Filip l’a expliqué dans la vidéo, vous pouvez aussi utiliser lapply() avec vos propres fonctions. Il vous suffit d’écrire une nouvelle fonction et de vous assurer qu’elle est disponible dans l’espace de travail. Ensuite, vous pourrez l’utiliser dans lapply() exactement comme avec les fonctions de base de R.

Dans l’exercice précédent, vous avez déjà utilisé lapply() pour convertir les informations sur vos statisticiens pionniers préférés en une liste de vecteurs composés de deux chaînes de caractères. Écrivons maintenant du code pour sélectionner séparément les noms et les années de naissance.

Le code d’exemple contient déjà la définition de select_first(), qui prend un vecteur en entrée et renvoie le premier élément de ce vecteur.

Cet exercice fait partie du cours

R niveau intermédiaire

Afficher le cours

Instructions

Appliquez select_first() aux éléments de split_low avec lapply() et affectez le résultat à une nouvelle variable names.
Ensuite, écrivez une fonction select_second() qui fait exactement la même chose pour le deuxième élément d’un vecteur en entrée.
Enfin, appliquez la fonction select_second() à split_low et affectez la sortie à la variable years.

Exercice interactif pratique

Essayez cet exercice en complétant cet exemple de code.

# Code from previous exercise:
pioneers <- c("GAUSS:1777", "BAYES:1702", "PASCAL:1623", "PEARSON:1857")
split <- strsplit(pioneers, split = ":")
split_low <- lapply(split, tolower)

# Write function select_first()
select_first <- function(x) {
  x[1]
}

# Apply select_first() over split_low: names


# Write function select_second()




# Apply select_second() over split_low: years

Modifier et exécuter le code