groupe_tableau_distribution: groupe_tableau_distribution

In AnthonyDEBUR/tools4DCE: Tools for rivers water quality monitoring

groupe_tableau_distribution

Description

fonction pour réaliser grouper les tableaux de distribution par paramètre et par un éventuel autre critère optionnel

Usage

groupe_tableau_distribution(
  donnees,
  col_Valeur = "RsAna",
  col_CdRq = "CdRqAna",
  col_CdParametre = "CdParametre",
  col_CdSupport = "CdSupport",
  col_CdFraction = "CdFractionAnalysee",
  col_CdUnite = "CdUniteMesure",
  col_tri = NULL,
  seuils
)

Arguments

donnees	: dataframe contenant les analyses dont il faut faire le bilan
col_Valeur	: nom de la colonne avec les résultats d'analyses (par défaut RsAna)
col_CdRq	: nom de la colonne avec le code remarque des analyses (par défaut CdRqAna). Les codes correspondent à ceux définis par le SANDRE.
col_CdParametre	: nom de la colonne avec le code parametre des analyses (par défaut CdParametre). Les codes correspondent à ceux définis par le SANDRE.
col_CdFraction	: nom de la colonne avec les codes SANDRE des fractions analysés (par défaut : CdFractionAnalysee), renseigner NULL si pas de colonne correspondant
col_CdUnite	: nom de la colonne avec les codes SANDRE des unités (par défaut : CdUniteMesure), renseigner NULL si pas de colonne correspondant
col_tri	: nom optionnel de la colonne complémentaire sur laquelle on veut faire le bilan (en plus des paramètres). Exemple : l'année des données
seuils	: liste d'objets de classe seuil
col_parametre	: nom de la colonne par rapport à laquelle faire le bilan (par défaut NomParametre)
col_CdSupport:	nom de la colonne avec les codes SANDRE des supports analysés (par défaut : CdSupport), renseigner NULL si pas de colonne correspondant

Value

la fonction renvoie un tableau qui liste, pour chaque classe, le nombre d'analyses correspondant

Examples

donnees<-data.frame(parametres=rep(c("1301", "1340", "1335"), 100), RsAna=sample(0.1:100, 300, replace=TRUE), LqAna=c(0.5,1,6))
donnees<-donnees%>%mutate(RsAna=ifelse(RsAna<LqAna, LqAna, RsAna))
donnees<-donnees%>%mutate(CdRqAna=ifelse(RsAna>LqAna, "1", ifelse(sample(1:100,5)>10,"10","1")))
seuils<-makeSeuils(CdParametre=donnees$parametres%>%unique, specificites=c("CYPRINICOLE", rep(NA,2)), type_seuil = "DCE")
groupe_tableau_distribution(donnees, col_CdParametre="parametres", col_CdSupport=NULL, col_CdFraction=NULL, col_CdUnite=NULL, seuils = seuils)

AnthonyDEBUR/tools4DCE documentation built on Feb. 14, 2025, 5:40 p.m.