From 3f3ed5fdb37a05e2b69e221fa352306daa52d94b Mon Sep 17 00:00:00 2001 From: ddotta Date: Wed, 13 Apr 2022 12:58:21 +0000 Subject: [PATCH 1/3] essai reproductibilite tableur --- .gitignore | 1 + .../Fiche_import_tableurs.Rmd | 88 +++++++++++++++---- 2 files changed, 72 insertions(+), 17 deletions(-) diff --git a/.gitignore b/.gitignore index 33d7d75b..8e0e3bd2 100644 --- a/.gitignore +++ b/.gitignore @@ -31,3 +31,4 @@ rapport étonnement CT.rtf pics_resized/* _pagedown_output/* +fichiers_tableurs/* diff --git a/03_Fiches_thematiques/Fiche_import_tableurs.Rmd b/03_Fiches_thematiques/Fiche_import_tableurs.Rmd index 0e3b8126..4691b99e 100644 --- a/03_Fiches_thematiques/Fiche_import_tableurs.Rmd +++ b/03_Fiches_thematiques/Fiche_import_tableurs.Rmd @@ -14,16 +14,45 @@ Il est déconseillé d'utiliser le _package_ `xlsx`. ## Importer un fichier `xlsx` ou `xls` -L'importation de fichiers `xlsx` et `xls` va être illustré à partir de deux jeux de données créés à partir de données présentes sur le site de l'Insee, en formats `xls` et `xlsx`. Pour reproduire les exemples ci-dessous, vous devez : - -- télécharger [les jeux de données ici](https://github.com/InseeFrLab/utilitR/tree/master/import_donnees_tabulees_tests) puis le sauvegarder sur votre poste ; -- définir dans `R` les chemins des fichiers nommés `chemin_xls` et `chemin_xlsx`. Voici un exemple : - ```{r, eval=FALSE} - # Attention, vous devez adapter le chemin des fichiers à votre environnement de travail - chemin_xls <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.xls" - chemin_xlsx <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.xlsx" - ``` - +L'importation de fichiers `xlsx` et `xls` va être illustré à partir de deux jeux de données créés à partir de données présentes sur le site de l'Insee, en formats `xls` et `xlsx`. +Pour reproduire les exemples ci-dessous, vous devez copier-coller le code suivant et l'exécuter sur votre poste. + +```{r téléchargement-xls-xlsx, message=FALSE, warning=FALSE} +# Installation du package {here} si besoin et chargement +if (!require("here", character.only = TRUE)) { + install.packages("here", dependencies = TRUE) + library("here", character.only = TRUE) +} + +# Définition des liens vers les fichiers tableurs +telechargement_xlsx <- "https://github.com/InseeFrLab/utilitR/raw/master/import_donnees_tabulees_tests/mes_donnees.xlsx" +telechargement_xls <- "https://github.com/InseeFrLab/utilitR/raw/master/import_donnees_tabulees_tests/mes_donnees.xls" + +# Définition des chemins sur son poste +if (!file.exists(paste0(here::here(),"/fichiers_tableurs"))) dir.create(paste0(here::here(),"/fichiers_tableurs")) +chemin_xlsx <- paste0(here::here(),"/fichiers_tableurs/mes_donnees.xlsx") +chemin_xls <- paste0(here::here(),"/fichiers_tableurs/mes_donnees.xls") + +# Téléchargement des fichiers tableurs +download.file(telechargement_xlsx,destfile = chemin_xlsx) +download.file(telechargement_xls,destfile = chemin_xls) +``` + + +- Les chemins des fichiers nommés `chemin_xls` et `chemin_xlsx` sont maintenant définis. Voici comment les afficher : +```{r consulter-chemin-xls-xlsx, eval=FALSE} +print(chemin_xls) +print(chemin_xlsx) +``` + +Dans vos travaux quotidiens, vous pouvez facilement définir vos propres chemins. Par exemple : + +```{r eval=FALSE} +chemin_xls <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.xls" +chemin_xlsx <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.xlsx" +``` + + ```{r, eval=TRUE, echo = FALSE} # Définir le chemin du fichier chemin_xls <- "./import_donnees_tabulees_tests/mes_donnees.xls" @@ -205,19 +234,44 @@ head(mesDonnees, 4) ### Introduction -Le _package_ `readODS` propose deux fonctions d'importation de fichiers `ods` : `read_ods` et `read.ods`. La documentation du _package_ recommande d'utiliser `read_ods`. L'usage de cette fonction va être illustré à partir d'un jeu de données créé à partir de données présentes sur le site de l'Insee. Pour reproduire les exemples ci-dessous, vous devez : +Le _package_ `readODS` propose deux fonctions d'importation de fichiers `ods` : `read_ods` et `read.ods`. La documentation du _package_ recommande d'utiliser `read_ods`. L'usage de cette fonction va être illustré à partir d'un jeu de données créé à partir de données présentes sur le site de l'Insee. +Pour reproduire les exemples ci-dessous, vous devez copier-coller le code suivant et l'exécuter sur votre poste. + +```{r téléchargement-ods, message=FALSE, warning=FALSE} +# Installation du package {here} si besoin et chargement +if (!require("here", character.only = TRUE)) { + install.packages("here", dependencies = TRUE) + library("here", character.only = TRUE) +} -- télécharger le jeu de données en format `ods` ici : `https://github.com/InseeFrLab/utilitR > import_donnees_tabulees_tests` puis le sauvegarder sur votre poste ; -- définir dans `R` le chemin du fichier nommé `chemin_ods`. Voici un exemple : - ```{r, eval=FALSE} - # Attention, cet exemple doit être adapté à votre environnement de travail - chemin_ods <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.ods" - ``` +# Définition des liens vers le fichier ods +telechargement_ods <- "https://github.com/InseeFrLab/utilitR/raw/master/import_donnees_tabulees_tests/mes_donnees.ods" +# Définition des chemins sur son poste +if (!file.exists(paste0(here::here(),"/fichiers_tableurs"))) dir.create(paste0(here::here(),"/fichiers_tableurs")) +chemin_ods <- paste0(here::here(),"/fichiers_tableurs/mes_donnees.ods") + +# Téléchargement du fichier ods +download.file(telechargement_ods,destfile = chemin_ods) +``` + +- Le chemin du fichier nommé `chemin_ods` est maintenant défini. Voici comment l'afficher : +```{r consulter-chemin-ods, eval=FALSE} +print(chemin_ods) +``` + +Dans vos travaux quotidiens, vous pouvez facilement définir vos propres chemins. Par exemple : + +```{r eval=FALSE} +chemin_ods <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.ods" +``` + + ```{r, eval=TRUE, echo = FALSE} # Définir le chemin du fichier chemin_ods <- "./import_donnees_tabulees_tests/mes_donnees.ods" ``` + Il ne faut pas oublier de charger le _package_ avec `library`. ```{r, message = FALSE} From 8a871bc9e3703306be35a7bde076176de585924b Mon Sep 17 00:00:00 2001 From: ddotta Date: Wed, 13 Apr 2022 13:50:07 +0000 Subject: [PATCH 2/3] Ajout argument mode manquant --- 03_Fiches_thematiques/Fiche_import_tableurs.Rmd | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/03_Fiches_thematiques/Fiche_import_tableurs.Rmd b/03_Fiches_thematiques/Fiche_import_tableurs.Rmd index 4691b99e..44a3d36f 100644 --- a/03_Fiches_thematiques/Fiche_import_tableurs.Rmd +++ b/03_Fiches_thematiques/Fiche_import_tableurs.Rmd @@ -34,8 +34,8 @@ chemin_xlsx <- paste0(here::here(),"/fichiers_tableurs/mes_donnees.xlsx") chemin_xls <- paste0(here::here(),"/fichiers_tableurs/mes_donnees.xls") # Téléchargement des fichiers tableurs -download.file(telechargement_xlsx,destfile = chemin_xlsx) -download.file(telechargement_xls,destfile = chemin_xls) +download.file(telechargement_xlsx,destfile = chemin_xlsx,mode = "wb") +download.file(telechargement_xls,destfile = chemin_xls,mode = "wb") ``` @@ -252,7 +252,7 @@ if (!file.exists(paste0(here::here(),"/fichiers_tableurs"))) dir.create(paste0(h chemin_ods <- paste0(here::here(),"/fichiers_tableurs/mes_donnees.ods") # Téléchargement du fichier ods -download.file(telechargement_ods,destfile = chemin_ods) +download.file(telechargement_ods,destfile = chemin_ods,mode = "wb") ``` - Le chemin du fichier nommé `chemin_ods` est maintenant défini. Voici comment l'afficher : From b88d207e51e391a2daa7bb844aaf18ebd2b46010 Mon Sep 17 00:00:00 2001 From: linogaliana Date: Fri, 11 Aug 2023 10:06:56 +0000 Subject: [PATCH 3/3] read ODS --- .../Fiche_import_tableurs.qmd | 77 +++++++++++++++---- 1 file changed, 64 insertions(+), 13 deletions(-) diff --git a/03_Fiches_thematiques/Fiche_import_tableurs.qmd b/03_Fiches_thematiques/Fiche_import_tableurs.qmd index 63224f9e..bc75759d 100644 --- a/03_Fiches_thematiques/Fiche_import_tableurs.qmd +++ b/03_Fiches_thematiques/Fiche_import_tableurs.qmd @@ -19,17 +19,45 @@ Il est déconseillé d'utiliser le _package_ `xlsx`. ## Importer un fichier `xlsx` ou `xls` -L'importation de fichiers `xlsx` et `xls` va être illustré à partir de deux jeux de données créés à partir de données présentes sur le site de l'Insee, en formats `xls` et `xlsx`. Pour reproduire les exemples ci-dessous, vous devez : +```{r téléchargement-xls-xlsx, message=FALSE, warning=FALSE} + ```{r, eval=FALSE} +# Installation du package {here} si besoin et chargement + # Attention, vous devez adapter le chemin des fichiers à votre environnement de travail +if (!require("here", character.only = TRUE)) { + chemin_xls <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.xls" + install.packages("here", dependencies = TRUE) + chemin_xlsx <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.xlsx" + library("here", character.only = TRUE) + ``` +} + +# Définition des liens vers les fichiers tableurs +telechargement_xlsx <- "https://github.com/InseeFrLab/utilitR/raw/master/import_donnees_tabulees_tests/mes_donnees.xlsx" +telechargement_xls <- "https://github.com/InseeFrLab/utilitR/raw/master/import_donnees_tabulees_tests/mes_donnees.xls" +# Définition des chemins sur son poste +if (!file.exists(paste0(here::here(),"/fichiers_tableurs"))) dir.create(paste0(here::here(),"/fichiers_tableurs")) +chemin_xlsx <- paste0(here::here(),"/fichiers_tableurs/mes_donnees.xlsx") +chemin_xls <- paste0(here::here(),"/fichiers_tableurs/mes_donnees.xls") +# Téléchargement des fichiers tableurs +download.file(telechargement_xlsx,destfile = chemin_xlsx,mode = "wb") +download.file(telechargement_xls,destfile = chemin_xls,mode = "wb") +``` + + +- Les chemins des fichiers nommés `chemin_xls` et `chemin_xlsx` sont maintenant définis. Voici comment les afficher : +```{r consulter-chemin-xls-xlsx, eval=FALSE} +print(chemin_xls) +print(chemin_xlsx) +``` -- télécharger [les jeux de données ici](https://github.com/InseeFrLab/utilitR/tree/master/import_donnees_tabulees_tests) puis le sauvegarder sur votre poste ; -- définir dans `R` les chemins des fichiers nommés `chemin_xls` et `chemin_xlsx`. Voici un exemple : +Dans vos travaux quotidiens, vous pouvez facilement définir vos propres chemins. Par exemple : -```{r, eval=FALSE} -# Attention, vous devez adapter le chemin des fichiers à votre environnement de travail +```{r eval=FALSE} chemin_xls <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.xls" chemin_xlsx <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.xlsx" ``` - + + ```{r, eval=TRUE, echo = FALSE} # Définir le chemin du fichier chemin_xls <- "./import_donnees_tabulees_tests/mes_donnees.xls" @@ -215,27 +243,50 @@ head(mesDonnees, 4) ### Introduction -Le _package_ `readODS` propose deux fonctions d'importation de fichiers `ods` : `read_ods` et `read.ods`. La documentation du _package_ recommande d'utiliser `read_ods`. L'usage de cette fonction va être illustré à partir d'un jeu de données créé à partir de données présentes sur le site de l'Insee. Pour reproduire les exemples ci-dessous, vous devez : +Le _package_ `readODS` propose deux fonctions d'importation de fichiers `ods` : `read_ods` et `read.ods`. La documentation du _package_ recommande d'utiliser `read_ods`. L'usage de cette fonction va être illustré à partir d'un jeu de données créé à partir de données présentes sur le site de l'Insee. +Pour reproduire les exemples ci-dessous, vous devez copier-coller le code suivant et l'exécuter sur votre poste. + +```{r téléchargement-ods, message=FALSE, warning=FALSE} +# Installation du package {here} si besoin et chargement +if (!require("here", character.only = TRUE)) { + install.packages("here", dependencies = TRUE) + library("here", character.only = TRUE) +} -- télécharger le jeu de données en format `ods` ici : `https://github.com/InseeFrLab/utilitR > import_donnees_tabulees_tests` puis le sauvegarder sur votre poste ; -- définir dans `R` le chemin du fichier nommé `chemin_ods`. Voici un exemple : +# Définition des liens vers le fichier ods +telechargement_ods <- "https://github.com/InseeFrLab/utilitR/raw/master/import_donnees_tabulees_tests/mes_donnees.ods" -```{r, eval=FALSE} -# Attention, cet exemple doit être adapté à votre environnement de travail -chemin_ods <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.ods" +# Définition des chemins sur son poste +if (!file.exists(paste0(here::here(),"/fichiers_tableurs"))) dir.create(paste0(here::here(),"/fichiers_tableurs")) +chemin_ods <- paste0(here::here(),"/fichiers_tableurs/mes_donnees.ods") + +# Téléchargement du fichier ods +download.file(telechargement_ods,destfile = chemin_ods,mode = "wb") +``` + +- Le chemin du fichier nommé `chemin_ods` est maintenant défini. Voici comment l'afficher : +```{r consulter-chemin-ods, eval=FALSE} +print(chemin_ods) +``` + +Dans vos travaux quotidiens, vous pouvez facilement définir vos propres chemins. Par exemple : + +```{r eval=FALSE} +chemin_ods <- "C:/Users/mon_IDEP_Insee/Dossier_utilitR/mes_donnees/mes_donnees.ods" ``` + ```{r, eval=TRUE, echo = FALSE} # Définir le chemin du fichier chemin_ods <- "./import_donnees_tabulees_tests/mes_donnees.ods" ``` + Il ne faut pas oublier de charger le _package_ avec `library`. ```{r, message = FALSE} library(readODS) ``` - ### Comment utiliser la fonction `read_ods()` Voici les principaux arguments et options de `read_ods()` :