View source: R/calcule_SEEE_IBG_DCE.R
calcule_SEEE_IBG_DCE | R Documentation |
fonction pour traiter une liste I2M2 via le script diagnostic invertébrés du SEEE voir : https://seee.eaufrance.fr/ outil de diagnostic invertébrés v. 1.0.2
calcule_SEEE_IBG_DCE(donnees)
donnees |
= data.table avec les colonnes requises par le script |
Les colonnes à passer impérativement dans la table d'entrée sont celles prévues dans le script :
CODE_OPERATION : identifiant unique de l'opération
CODE_STATION : code SANDRE de la station de mesure
DATE : date de l'opération (format "%d/%m/%Y")
TYPONATIONALE : Typologie nationale de la station (ex. TP12-A)
CODE_PHASE : code de la phase de prélèvement (A, B ou C)
CODE_TAXON : code SANDRE du taxon
RESULTAT : effectif du taxon
CODE_REMARQUE : code remarque selon le SANDRE
Résultats outil IBG-DCE invertébrés SEEE
stations_op<-import_hubeau_indices_hbio(liste_stations = "04207400", indice="inv")
stations_op<-stations_op%>%subset(CdParametre=="7613")
donnees<-import_hubeau_liste_hbio(liste_stations = c(station_etudiee), indice="inv")
donnees<-donnees%>%subset(date_prelevement%in%stations_op$DatePrel)
donnees$CODE_OPERATION <-
paste0(donnees$code_station_hydrobio, "*", donnees$date_prelevement)
donnees$CODE_STATION <- donnees$code_station_hydrobio
donnees$DATE <- format(donnees$date_prelevement, "%d/%m/%Y")
donnees$TYPO_NATIONALE <- "P12-A"
donnees$CODE_PHASE <- donnees$code_lot
donnees$CODE_TAXON <- donnees$code_appel_taxon
donnees$RESULTAT <- donnees$resultat_taxon
donnees$CODE_REMARQUE <- donnees$code_type_resultat
donnees <- donnees %>% select(CODE_OPERATION, CODE_STATION, DATE, TYPONATIONALE, CODE_PHASE, CODE_TAXON, RESULTAT, CODE_REMARQUE)
calcule_SEEE_IBG_DCE(donnees)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.