analyte_mapping.R

    original.analyte.name == "Ammonium"                                    ~ "Ammonium",

    original.analyte.name == "Ammonia__N_"                                 ~ "Ammonia",

    original.analyte.name == "Chlorophyll_a"                               ~ "Chlorophyll_a",
    original.analyte.name == "Chlorophyll_a-_uncorrected"                  ~ "Chlorophyll_a",
    original.analyte.name == "Chlorophyll_a__uncorrected_for_pheophytin"   ~ "Chlorophyll_a"
    original.analyte.name == "Chlorophyll_a__free_of_pheophytin"           ~ "Chlorophyll_a",
    original.analyte.name == "Chlorophyll_a-_corrected"                    ~ "Chlorophyll_a",
    original.analyte.name == "Chlorophyll_a__corrected_for_pheophytin"     ~ "Chlorophyll_a",

    original.analyte.name == "Dissolved_oxygen__DO_"                       ~ "Dissolved_Oxygen",
    original.analyte.name == "Oxygen__Dissolved"                           ~ "Dissolved_Oxygen",
    original.analyte.name == "Dissolved_Oxygen__Discrete_"                 ~ "Dissolved_Oxygen",
    original.analyte.name == "Dissolved_Oxygen__CTD_"                      ~ "Dissolved_Oxygen",
    original.analyte.name == "Dissolved_Oxygen"                            ~ "Dissolved_Oxygen",

    original.analyte.name == "Specific_Conductivity"                       ~ "Specific_Conductivity",
    original.analyte.name == "Field_Specific_Conductance"                  ~ "Specific_Conductivity",

    original.analyte.name == "Fecal_Coliforms"                             ~ "Fecal_Coliforms",

    original.analyte.name == "Enterococci"                                 ~ "Enterococci",

    original.analyte.name == "Nitrogen__Ammonia"                           ~ "Nitrogen__Ammonia",
    
    original.analyte.name == "Nitrite"                                     ~ "Nitrite",
    original.analyte.name == "Nitrite__N_"                                 ~ "Nitrite",
    original.analyte.name == "Nitrogen__Nitrite__NO2__as_N"                ~ "Nitrite",
    original.analyte.name == "Nitrogen__Nitrite__NO2__as_NO2"              ~ "Nitrite",

    original.analyte.name == "Nitrate"                                     ~ "Nitrate",
    original.analyte.name == "Nitrate__N_"                                 ~ "Nitrate",
    original.analyte.name == "Nitrogen__Nitrate__NO3__as_N"                ~ "Nitrate",
    original.analyte.name == "Nitrogen__Nitrate__NO3__as_NO3"              ~ "Nitrate",
    
    original.analyte.name == "NO2+3__Filtered"                             ~ "Nitrate+Nitrite",
    original.analyte.name == "Nitrate+Nitrite"                             ~ "Nitrate+Nitrite",
    original.analyte.name == "Nitrogen__Nitrite__NO2__+_Nitrate__NO3__as_N"~ "Nitrate+Nitrite",
    original.analyte.name == "Nitrate-Nitrite__N_"                         ~ "Nitrate+Nitrite",
    original.analyte.name == "Nitrogen__NO2_plus_NO3"                      ~ "Nitrate+Nitrite",
    
    original.analyte.name == "Nitrogen__ammonia__NH3__+_ammonium__NH4_"    ~ "Nitrogen__ammonia__NH3__+_ammonium__NH4_",

    original.analyte.name == "Nitrogen__ammonia_as_N"                      ~ "Nitrogen__ammonia_as_N",

    original.analyte.name == "Nitrogen__ammonia__NH3__as_NH3"              ~ "Nitrogen__ammonia__NH3__as_NH3",

    original.analyte.name == "Nitrogen-_Total"                             ~ "Total_Nitrogen",

    original.analyte.name == "Orthophosphate__P_"                          ~ "Orthophosphate",
    original.analyte.name == "Phosphorus__orthophosphate_as_P"             ~ "Orthophosphate",
    original.analyte.name == "Phosphate"                                   ~ "Orthophosphate",

    original.analyte.name == "Phosphorus__Total__as_P__LL"                 ~ "Phosphorus",
    original.analyte.name == "Total_Phosphorus"                            ~ "Phosphorus",
    original.analyte.name == "Phosphorus-_Total"                           ~ "Phosphorus",
    original.analyte.name == "Phosphorus_as_P"                             ~ "Phosphorus",

    original.analyte.name == "Pheophytin"                                  ~ "Pheophytin",

    original.analyte.name == "Field_pH"                                    ~ "pH",
    original.analyte.name == "pH"                                          ~ "pH",

    original.analyte.name == "Salinity"                                    ~ "Salinity",

    original.analyte.name == "Silica__SiO2_"                               ~ "Silicate",
    original.analyte.name == "Silicate"                                    ~ "Silicate",

    original.analyte.name == "Temperature"                                 ~ "Temperature",
    original.analyte.name == "Temperature__Water"                          ~ "Temperature",
    original.analyte.name == "Temperature__water"                          ~ "Temperature",
    original.analyte.name == "Field_Temperature"                           ~ "Temperature",
    original.analyte.name == "Water_Temperature"                           ~ "Temperature",

    original.analyte.name == "Total_Nitrogen"                              ~ "Total_Nitrogen",

    original.analyte.name == "Total_Kjeldahl_Nitrogen"                     ~ "Total_Kjeldahl_Nitrogen",
    original.analyte.name == "Nitrogen__Kjeldahl"                          ~ "Total_Kjeldahl_Nitrogen",
    original.analyte.name == "Nitrogen-_Total_Kjeldahl"                    ~ "Total_Kjeldahl_Nitrogen",
    original.analyte.name == "Nitrogen__Kjeldahl__Total"                   ~ "Total_Kjeldahl_Nitrogen",

    original.analyte.name == "Turbidity"                                   ~ "Turbidity",