Ici dans ce tutoriel, nous allons montrer comment créer une liste de plusieurs librairies que nous souhaitons télécharger et que nous ne voulons pas faire au cas par cas par cause de perte de temps. Oui c’est nul de le faire au cas par cas et j’aime pas trop perdre mon temps!!! :-) Ce type d’installation peut être très pratique, surtout imaginez si on perd l’ensemble de nos packages! ;-)
# Liste des librairies
liste_librairie <- c("plotly","Tidyverse","e1071","rpart","randomForest","caret","shinydashboard","shiny","RCurl","ggthemes","wordcloud","OAuth","twitteR","httr","tm","reshape2","lubridate","rvest","downloader")
Tout d’abord il va tester si la librairie listée est déjà installée, si oui, il va passer à la librairie suivante, etc…
# Fonctions
install_packages <- function(liste_librairie)
{
liste_des_librairies_a_telecharger <- liste_librairie[!(liste_librairie %in% install.packages() [, "Package"])]
if (length(liste_des_librairies_a_telecharger))
{
install.packages(liste_des_librairies_a_telecharger, repos = 'http://cran.us.r-project.org', dependencies = TRUE)
}
lapply(liste_librairie, library, character.only = TRUE)
}
# Utilisation de la fonction
# install_packages(liste_librairie)