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 suffit d'écrire une nouvelle fonction et de vous assurer qu'elle est disponible dans l'espace de travail. Ensuite, vous pouvez l'utiliser dans lapply() tout comme vous l'avez fait avec les fonctions de base de R.
Dans l'exercice précédent, vous avez déjà utilisé lapply() pour convertir l'information sur vos statisticiens et statisticiennes 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 fourni comprend déjà la définition de select_first(), qui prend un vecteur en entrée et retourne le premier élément de ce vecteur.
Cette activité fait partie du cours
R intermédiaire
Instructions de l’exercice
- Appliquez
select_first()aux éléments desplit_lowaveclapply()et affectez le résultat à une nouvelle variablenames. - 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_lowet affectez la sortie à la variableyears.
Exercice interactif pratique
Essayez cet exercice en complétant ce code d’exemple.
# 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