Maps a vector of species codes from forest inventory data to medfate species names

translateSpeciesCodes(x, species_names, species_codes)

Arguments

x

A vector of forest inventory species codes to be mapped.

species_names

A string vector of medfate species names with the same length as codes.

species_codes

A string vector of the forest inventory species codes that correspond to the model species codification (species_names). Each string may contain different coma-separated codes in order to map different forest inventory species into a single model species.

Value

A string vector with the length of x and translated species names

See also

Author

Miquel De Cáceres Ainsa, EMF-CREAF

Examples

data(NFI_SP_mapping)
data(piesMayoresIFN2)

piesMayoresIFN2$Especie
#>  [1] "0025" "0025" "0024" "0025" "0044" "0025" "0025" "0025" "0025" "0025"
#> [11] "0025" "0025" "0025" "0045" "0025" "0025" "0025" "0045" "0025" "0045"
#> [21] "0025" "0025" "0044" "0025" "0025" "0021" "0025" "0025" "0025" "0025"
#> [31] "0021" "0025" "0021" "0025" "0025" "0021" "0025" "0025" "0025" "0044"
#> [41] "0025" "0025" "0025" "0024" "0025" "0024" "0025" "0024" "0024" "0024"
#> [51] "0025" "0025" "0025" "0025" "0025" "0025" "0025" "0024" "0025" "0025"
#> [61] "0025" "0025" "0025" "0025" "0025" "0025" "0025" "0025" "0025" "0025"
#> [71] "0025" "0025" "0025" "0025" "0025" "0025" "0025" "0025" "0025"

translateSpeciesCodes(x = piesMayoresIFN2$Especie,
                      species_names = NFI_SP_mapping$NFIName,
                      species_codes = NFI_SP_mapping$NFICode)
#>  [1] "Pinus nigra"               "Pinus nigra"              
#>  [3] "Pinus halepensis"          "Pinus nigra"              
#>  [5] "Quercus faginea"           "Pinus nigra"              
#>  [7] "Pinus nigra"               "Pinus nigra"              
#>  [9] "Pinus nigra"               "Pinus nigra"              
#> [11] "Pinus nigra"               "Pinus nigra"              
#> [13] "Pinus nigra"               "Quercus ilex ssp. ballota"
#> [15] "Pinus nigra"               "Pinus nigra"              
#> [17] "Pinus nigra"               "Quercus ilex ssp. ballota"
#> [19] "Pinus nigra"               "Quercus ilex ssp. ballota"
#> [21] "Pinus nigra"               "Pinus nigra"              
#> [23] "Quercus faginea"           "Pinus nigra"              
#> [25] "Pinus nigra"               "Pinus sylvestris"         
#> [27] "Pinus nigra"               "Pinus nigra"              
#> [29] "Pinus nigra"               "Pinus nigra"              
#> [31] "Pinus sylvestris"          "Pinus nigra"              
#> [33] "Pinus sylvestris"          "Pinus nigra"              
#> [35] "Pinus nigra"               "Pinus sylvestris"         
#> [37] "Pinus nigra"               "Pinus nigra"              
#> [39] "Pinus nigra"               "Quercus faginea"          
#> [41] "Pinus nigra"               "Pinus nigra"              
#> [43] "Pinus nigra"               "Pinus halepensis"         
#> [45] "Pinus nigra"               "Pinus halepensis"         
#> [47] "Pinus nigra"               "Pinus halepensis"         
#> [49] "Pinus halepensis"          "Pinus halepensis"         
#> [51] "Pinus nigra"               "Pinus nigra"              
#> [53] "Pinus nigra"               "Pinus nigra"              
#> [55] "Pinus nigra"               "Pinus nigra"              
#> [57] "Pinus nigra"               "Pinus halepensis"         
#> [59] "Pinus nigra"               "Pinus nigra"              
#> [61] "Pinus nigra"               "Pinus nigra"              
#> [63] "Pinus nigra"               "Pinus nigra"              
#> [65] "Pinus nigra"               "Pinus nigra"              
#> [67] "Pinus nigra"               "Pinus nigra"              
#> [69] "Pinus nigra"               "Pinus nigra"              
#> [71] "Pinus nigra"               "Pinus nigra"              
#> [73] "Pinus nigra"               "Pinus nigra"              
#> [75] "Pinus nigra"               "Pinus nigra"              
#> [77] "Pinus nigra"               "Pinus nigra"              
#> [79] "Pinus nigra"