data-raw/sn_first_names_combinations.R

In giocomai/streetnamer: Match street names to their Wikidata identifier with a Shiny interface

## code to prepare `sn_first_names_combinations` dataset goes here

croatia_df <- tibble::tribble(
  ~original_first_name, ~fixed_first_name,
  "Adama", "Adam",
  "Adolfa", "Adolf",
  "Aladara", "Aladar",
  "Albe ", "Alba ",
  "Alberta ", "Albert ",
  "Alexandera", "Alexander",
  "Aleksandra", "Aleksandar",
  "Alekse", "Aleksa",
  "Ambroza", "Ambroz",
  "Anđela", "Anđelo",
  "Andrija", "Andrij",
  "Andrije", "Andrija",
  "Anke", "Anka",
  "Ante", "Ante",
  "Antona", "Anton",
  "Antuna", "Antun",
  "Armina", "Armin",
  "Arnošta", "Arnošt",
  "Augusta", "August",
  "Baltazara", "Baltazar",
  "Bartola", "Bartol",
  "Bartula", "Bartul",
  "Bašćanske", "Bašćanska",
  "Bedema", "Bedem",
  "Bedricha", "Bedrich",
  "Bele", "Bela",
  "Benedikta", "Benedikt",
  "Bernarda", "Bernard",
  "Blagoje", "Blagoja",
  "Blaža", "Blaž",
  "Bogoslava", "Bogoslav",
  "Borisa", "Boris",
  "Bože", "Boža",
  "Božidara", "Božidar",
  "Braće", "Braća",
  "Branimira", "Branimir",
  "Branka", "Brank",
  "Brune", "Bruna",
  "Celestina", "Celestin",
  "Cesarićeva", "Cesarićev",
  "Charlesa", "Charles",
  "Crvenog", "Crvenog",
  "Cvijete", "Cvijeta",
  "Cvjetka", "Cvjetk",
  "Damira", "Damir",
  "Dane", "Dana",
  "Darka", "Dark",
  "Davora", "Davor",
  "Davorina", "Davorin",
  "Demetrove", "Demetrova",
  "Didaka", "Didak",
  "Dimitrija", "Dimitrij",
  "Dinka", "Dink",
  "Divka", "Divk",
  "Dobriše", "Dobriša",
  "Dobrovoljačke", "Dobrovoljačka",
  "Dominika", "Dominik",
  "Dore", "Dora",
  "Dragana", "Dragan",
  "Drage", "Drago",
  "Dragice", "Dragica",
  "Dragojla", "Dragojl",
  "Dragojle", "Dragojla",
  "Dragutina", "Dragutin",
  "Dražena", "Dražen",
  "Dubravka", "Dubravko",
  "Dujma", "Dujm",
  "Dunda", "Dund",
  "Đure", "Đuro",
  "Dušana", "Dušan",
  "Eduarda", "Eduard",
  "Eleonore", "Eleonora",
  "Emanuela", "Emanuel",
  "Emila", "Emil",
  "Erazma", "Erazm",
  "Ernsta", "Ernst",
  "Ervine", "Ervina",
  "Eugena", "Eugen",
  "Fausta", "Faust",
  "Ferde", "Ferdo",
  "Ferdinarda", "Ferdinard",
  "Filipa", "Filip",
  "Florijana", "Florijan",
  "Frana", "Fran",
  "Francesca", "Francesc",
  "Frane", "Frano",
  "Franje", "Franjo",
  "Gaje", "Gaja",
  "Gjure", "Gjuro",
  "Gorana", "Goran",
  "Gordana", "Gordan",
  "grad ", "",
  "Grete", "Greta",
  "Grge", "Grga",
  "Grgura", "Grgur",
  "Grigora", "Grigor",
  "Gundulićeve", "Gundulićeva",
  "Gupčeve", "Gupčeva",
  "Gustava", "Gustav",
  "Habeka", "Habek",
  "Hanibala", "Hanibal",
  "Hasana", "Hasan",
  "Henrija", "Henrij",
  "Henrika", "Henrik",
  "Hermana", "Herman",
  "Hinka", "Hink",
  "Hrvoja", "Hrvoje",
  "Huberta", "Hubert",
  "Huga", "Hugo",
  "Ignaca", "Ignac",
  "Ignjata", "Ignjat",
  "Ilije", "Ilija",
  "Isidora", "Isidor",
  "Ive ", "Ivo ",
  "Ivana", "Ivan",
  "Ivane", "Ivana",
  "Ivice", "Ivica",
  "Izidora", "Izidor",
  "Jagode", "Jagoda",
  "Jakova", "Jakov",
  "Jana", "Jan",
  "Janeza", "Janez",
  "Janka", "Janko",
  "Jaroslava", "Jaroslav",
  "Jerolima", "Jerolim",
  "Jeronima", "Jeronim",
  "Josipa", "Josip",
  "Joze", "Jozo",
  "Józsefa", "József",
  "Julija ", "Julije ",
  "Julijana", "Julijan",
  "Junija", "Junij",
  "Juraja", "Juraj",
  "Jure", "Jure",
  "Jurja", "Juraj",
  "Karela", "Karel",
  "Karla", "Karl",
  "Kate", "Kata",
  "Kazimira", "Kazimir",
  "Kerestinečkih", "Kerestinečkih",
  "Klementa", "Klement",
  "Kolarićeve", "Kolarićeva",
  "Konstantina", "Konstantin",
  "Kontese", "Kontesa",
  "Kozarčeve", "Kozarčeva",
  "Kreše", "Kreša",
  "Krešimira", "Krešimir",
  "Krste", "Krsta",
  "Kružna", "Kružn",
  "Ksavera", "Ksaver",
  "Ksenije", "Ksenija",
  "Ladislava", "Ladislav",
  "Lavoslava", "Lavoslav",
  "Lea ", "Leo ",
  "Leopolda", "Leopold",
  "Lisinskog", "Lisinskog",
  "Ljerke", "Ljerka",
  "Ljubomira", "Ljubomir",
  "Ljudevita", "Ljudevit",
  "Louisa", "Louis",
  "Lovre", "Lovro",
  "Lucijana", "Lucijan",
  "Ludovika", "Ludovik",
  "Luigija", "Luigi",
  "Luke", "Luka",
  "Mahatme", "Mahatma",
  "Majke", "Majka",
  "Majstora", "",
  "Maksimilijana", "Maksimilijan",
  "Mane", "Mana",
  "Margarete", "Margareta",
  "Marice", "Marica",
  "Marijana", "Marijan",
  "Marijane", "Marijana",
  "Marija", "Marij",
  "Marije", "Marija",
  "Marina", "Marin",
  "Marka", "Marko",
  "Martina", "Martin",
  "Marulićeve", "Marulićeva",
  "Matice", "Matica",
  "Matije", "Matija",
  "Matka", "Matko",
  "Mavra", "Mavro",
  "Meda", "Medo",
  "Metela", "Metel",
  "Mihovila", "Mihovil",
  "Mihe ", "Miho ",
  "Mije", "Mijo",
  "Mikše", "Mikša",
  "Milana", "Milan",
  "Mile", "Mila",
  "Milice", "Milica",
  "Milislava", "Milislav",
  "Milivoja", "Milivoj",
  "Miljenka", "Miljenk",
  "Milke", "Milka",
  "Milovana", "Milovan",
  "Milutina", "Milutin",
  "Mire", "Mira",
  "Mirka", "Mirko",
  "Miroslava", "Miroslav",
  "Mladena", "Mladen",
  "Mladosti", "Mladosti",
  "Modre", "Modra",
  "Nade", "Nada",
  "Naste", "Nasta",
  "Natka", "Natko",
  "Nede", "Neda",
  "Nenada", "Nenad",
  "Nike", "Niko",
  "Nikole", "Nikola",
  "Nine", "Nina",
  "Ognjeslava", "Ognjeslav",
  "Oktavijana", "Oktavijan",
  "Oskara", "Oskar",
  "Otona", "Oton",
  "Pabla", "Pablo",
  "Paje", "Paja",
  "Paška", "Pašk",
  "Paškala", "Paškal",
  "Paule", "Paula",
  "Pavla", "Pavle",
  "Pavleka", "Pavlek",
  "Pere", "Pero",
  "Petra", "Petar",
  "Petrice", "Petrica",
  "Predraga", "Predrag",
  "Radoslava", "Radoslav",
  "Radovana", "Radovan",
  "Rafaela", "Rafael",
  "Rafe", "Rafa",
  "Ranka ", "Ranko ",
  "Raula", "Raul",
  "Reljkovićeva", "Reljkovićev",
  "Republike", "Republika",
  "Roberta", "Robert",
  "Ruđera", "Ruđer",
  "Rudolfa", "Rudolf",
  "Ružice", "Ružica",
  "Saliha", "Salih",
  "Savezne", "Savezna",
  "Selje", "Selja",
  "Side", "Sida",
  "Silvija", "Silvije",
  "Simona", "Simon",
  "Siniše", "Siniša",
  "Slavka", "Slavko",
  "Slavoljuba", "Slavoljub",
  "Spiridona", "Spiridon",
  "Srećka", "Srećko",
  "Stanislava", "Stanislav",
  "Stanka", "Stanko",
  "Stipana", "Stipan",
  "Stipe", "Stipa",
  "Stjepana", "Stjepan",
  "Stojana", "Stojan",
  "Sunčane", "Sunčana",
  "Svetog", "Sveti",
  "Tadije", "Tadija",
  "Thomasa", "Thomas",
  "Tihomila", "Tihomil",
  "Tihomira", "Tihomir",
  "Tina", "Tin",
  "Tita", "Tito",
  "Tome", "Tomo",
  "Tomislava", "Tomislav",
  "Toše ", "Tošo ",
  "Tvrtka", "Tvrtko",
  "Ulderika", "Ulderiko",
  "Vale", "Vale",
  "Valerijana", "Valerijan",
  "Valunske", "Valunska",
  "Vanje", "Vanja",
  "Vatroslava", "Vatroslav",
  "Vebera", "Veber",
  "Većeslava", "Većeslav",
  "Velimira", "Velimir",
  "Veloga", "Veli",
  "Vere", "Vera",
  "Veselka", "Veselko",
  "Vice", "Vica",
  "Vida", "Vid",
  "Viktora", "Viktor",
  "Vile", "Vila",
  "Vilima", "Vilim",
  "Vilka", "Vilk",
  "Vincenta", "Vincent",
  "Vinka", "Vinko",
  "Višnje", "Višnja",
  "Vjekoslava", "Vjekoslav",
  "Vjenceslava", "Vjenceslav",
  "Vlade ", "Vlado ",
  "Vladimira", "Vladimir",
  "Vlahe", "Vlaha",
  "Vojina", "Vojin",
  "Vojmila", "Vojmil",
  "Zagrebačkog", "Zagrebačkog",
  "Zdenka", "Zdenko",
  "Zdeslava", "Zdeslav",
  "Zdravka", "Zdravko",
  "Zinke", "Zinka",
  "Zlatarova", "Zlatarov",
  "Zlatka", "Zlatko",
  "Zulejke", "Zulejka",
  "Zvjezdane", "Zvjezdana",
  "Zvonimira", "Zvonimir",
  "Željka ", "Željko "
)
sn_first_names_combinations <- list()
sn_first_names_combinations[["Croatia"]] <- croatia_df

usethis::use_data(sn_first_names_combinations, overwrite = TRUE)