knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(didoscalim) library(magrittr) library(dplyr, quietly = TRUE, warn.conflicts = FALSE)
# bugfix pour check() library(stringr) library(purrr, warn.conflicts = FALSE) ds <- list_datasets() if (nrow(ds) > 0) ds %>% filter(str_detect(title, "Données.*fictive")) %>% select(id) %>% pmap(~ delete_dataset(..1))
Afin d'éviter les erreurs de manipulation, il est conseillé de préparer ses
scripts de chargement sur l'environnement ECOLE
et de les passer après sur
PROD
. Vous trouverez plus d'info dans la vignette sur les
environnements.
Créer un dataset avec les caractéristiques suivantes :
dataset <- add_dataset( title = "Données de consommation fictive", description = "test", topic = "Transports", temporal_coverage_start = "2020-01-01", temporal_coverage_end = "2020-12-31", frequency = "annual", frequency_date = "2021-10-10" )
add_datafile( dataset = dataset, file_name = "augmente.csv", title = "Données de consommation fictive – chaleur et froid – année 2020", description = "Consommations annuelles et nombre de points de livraison", temporal_coverage_start = "2020-01-01", temporal_coverage_end = "2020-12-31", millesime = "2021-10" )
add_attachment( dataset = dataset, file_name = 'annexe.txt', title = "Liste des variables - chaleur et froid", description = "Détail des variables - fichiers chaleur et froid" )
La procédure est simple :
Pour ajouter un millésime vous devez d'abord récupérer le fichier de données.
Vous pouvez le chercher par son titre avec la fonction get_datafile()
. Cette
fonction retourne beaucoup d'information non pertinentes dans le cadre d'une
mise à jour, vous pouvez utiliser clean_metadata()
:
datafile <- get_datafile(title = "Données de consommation fictive – chaleur et froid – année 2020") %>% clean_metadata() datafile
millesime <- add_millesime( datafile = datafile, file_name = "augmente.csv", millesime = "2022-10" )
Trois métadonnées peuvent devoir être mises à jour :
Tout d'abord récupérer les métadonnées :
datafile <- get_datafile(millesime) %>% clean_metadata() datafile
Modifier la ou les métadonnées concernées et faire la mise à jour :
datafile$temporal_coverage$end <- "2021-12-31" update_datafile(datafile)
Encore une fois, commencer par récupérer les métadonnées du dataset :
dataset <- get_dataset(datafile) %>% clean_metadata() dataset
Puis modifier les métadonnées concernées et faire la mise à jour. Dans ce cas là on met à jour la date de fin de couverture temporelle et la date de prochaine mise à jour :
dataset$temporal_coverage$end <- "2021-12-31" dataset$frequency_date <- "2022-10-10T00:00:00" update_dataset(dataset)
L'ajout du millésime est terminé.
Parfois vous voulez remplacer un millésime existant.
Pour mettre à jour le dernier millésime d'un fichier de données, la procédure est :
datafile <- get_datafile(title = "Données de consommation fictive – chaleur et froid – année 2020") %>% clean_metadata() datafile
On récupére le dernier millesime du datafile
millesime_row <- list_millesimes(datafile) %>% slice_max(order_by = millesime) millesime <- millesime_row[['millesime']] millesime
Et on le remplace :
millesime <- replace_millesime( datafile = datafile, file_name = "augmente.csv", millesime = millesime )
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.