Vous animez un atelier faisant appel au langage R et voulez vous assurer que les participants et participantes ont bien installé chaque librairie requise?
La fonction ci-dessous vérifie si des librairies sont bien installées. Remarquez l’utilisation de la fonction cat() pour pouvoir afficher des messages dans la console à partir d’une fonction.
VerifierLibrairies <- function(packages) {
cat("Vérification des librairies... \n")
if (length(setdiff(packages, rownames(installed.packages()))) > 0) {
manquants <- setdiff(packages, rownames(installed.packages()))
cat("Librairies manquantes: \n ")
paste(manquants, collapse = ", ")
cat(manquants)
} else {
cat("Tout est correctement installé :)")
}
}
Il faut d’abord faire rouler le code de la fonction pour la charger en mémoire. Ensuite, on peut l’exécuter en lui passant en paramètre un vecteur contenant la liste dont on a besoin.
librairies.requises <- c("tidyverse", "data.table", "blabla", "etc")
VerifierLibrairies(librairies.requises)
Notez qu’il faudra quand même installer les librairies si elles ne le sont pas déjà, et que toutes les librairies devront être chargées avec library().