Takes any vector of affiliations and returns languages.
Examples
lang.aff('Slavic')
#> [1] "Belarusian" "Old Russian"
#> [3] "Russian" "Upper Sorbian"
#> [5] "Lower Sorbian" "Slovak"
#> [7] "Czech" "Polabian"
#> [9] "Kashubian" "Church Slavic"
#> [11] "Kajkavian" "Serbian-Croatian-Bosnian"
#> [13] "Slavomolisano" "Slovenian"
#> [15] "Ukrainian" "Rusyn"
#> [17] "Silesian" "Polish"
#> [19] "Bulgarian" "Macedonian"
lang.aff(c('Slavic', 'Celtic'))
#> [1] "Belarusian" "Old Russian"
#> [3] "Russian" "Upper Sorbian"
#> [5] "Lower Sorbian" "Slovak"
#> [7] "Czech" "Polabian"
#> [9] "Kashubian" "Church Slavic"
#> [11] "Kajkavian" "Serbian-Croatian-Bosnian"
#> [13] "Slavomolisano" "Slovenian"
#> [15] "Ukrainian" "Rusyn"
#> [17] "Silesian" "Polish"
#> [19] "Bulgarian" "Macedonian"
#> [21] "Celtiberian" "Lepontic"
#> [23] "Cisalpine Gaulish" "Transalpine Gaulish"
#> [25] "Early Irish" "Galatian"
#> [27] "Noric" "Irish"
#> [29] "Old South-West British" "Welsh"
#> [31] "Old-Middle Welsh" "Scottish Gaelic"
#> [33] "Manx" "Cornish"
#> [35] "Vannetais" "Breton"
lang.aff(c('Slavic', 'Celtic'), list = TRUE)
#> [[1]]
#> [1] "Belarusian" "Old Russian"
#> [3] "Russian" "Upper Sorbian"
#> [5] "Lower Sorbian" "Slovak"
#> [7] "Czech" "Polabian"
#> [9] "Kashubian" "Church Slavic"
#> [11] "Kajkavian" "Serbian-Croatian-Bosnian"
#> [13] "Slavomolisano" "Slovenian"
#> [15] "Ukrainian" "Rusyn"
#> [17] "Silesian" "Polish"
#> [19] "Bulgarian" "Macedonian"
#>
#> [[2]]
#> [1] "Celtiberian" "Lepontic" "Cisalpine Gaulish"
#> [4] "Transalpine Gaulish" "Early Irish" "Galatian"
#> [7] "Noric" "Irish" "Old South-West British"
#> [10] "Welsh" "Old-Middle Welsh" "Scottish Gaelic"
#> [13] "Manx" "Cornish" "Vannetais"
#> [16] "Breton"
#>
