arthur/ArtStudies
1
0
Fork 0
mirror of https://github.com/ArthurDanjou/ArtStudies.git synced 2026-01-14 15:54:13 +01:00
Code Issues Packages Projects Releases Wiki Activity

Réorganisation du code pour améliorer la lisibilité et la structure de l'installation des packages

Browse Source
This commit is contained in:
Arthur Danjou
2025-10-14 11:16:14 +02:00
parent 5af3c76113
commit 85a7469195
1 changed files with 14 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
M2/Data Visualisation/init.R
View File

@@ -1,25 +1,24 @@
# Liste des packages à installer
packages_to_install <- c(
"lattice", "grid", "ggplot2", "gridExtra", "locfit", "scales",
"formattable", "RColorBrewer", "plotly", "dplyr", "tidyr",
"rmarkdown", "ggthemes", "cowplot", "kableExtra", "ggridges",
"colorspace", "sf", "mapview", "tidyverse", "readxl", "readr",
"giscoR", "gapminder", "GGally", "ggfortify", "lubridate", "zoo",
"xts", "forecast", "feasts", "tseries", "tsibble", "fable"
"lattice", "grid", "ggplot2", "gridExtra", "locfit", "scales",
"formattable", "RColorBrewer", "plotly", "dplyr", "tidyr",
"rmarkdown", "ggthemes", "cowplot", "kableExtra", "ggridges",
"colorspace", "sf", "mapview", "tidyverse", "readxl", "readr",
"giscoR", "gapminder", "GGally", "ggfortify", "lubridate", "zoo",
"xts", "forecast", "feasts", "tseries", "tsibble", "fable"
)
# Fonction pour installer les packages manquants
install_if_absent <- function(package_name) {
if (!requireNamespace(package_name, quietly = TRUE)) {
install.packages(package_name)
message(paste("Package", package_name, "installé avec succès."))
} else {
message(paste("Package", package_name, "déjà installé, installation ignorée."))
}
if (!requireNamespace(package_name, quietly = TRUE)) {
install.packages(package_name)
message(paste("Package", package_name, "installé avec succès."))
} else {
message(
paste("Package", package_name, "déjà installé, installation ignorée.")
)
}
}
# Appliquer la fonction à la liste de packages
lapply(packages_to_install, install_if_absent)
# Note : Une fois les packages installés, n'oubliez pas de les charger dans votre session R
# avec la commande library(). Par exemple, library(tidyverse).