setwd("~/Desktop/PSU_DAT3000_IntroToDA/05_module8/data/")
data <- read_excel("My_Data.xlsx")
data## # A tibble: 1,302 × 9
## Language Endonym `World Region` Country `Global Speakers` `Language Family`
## <chr> <chr> <chr> <chr> <dbl> <chr>
## 1 Abakuá Abakuá Caribbean "Cuba" NA <NA>
## 2 Abaza Абаза Western Asia "Turke… 49800 Abkhaz-Adyge
## 3 Abruzzese… Abruzz… Southern Euro… "Italy" NA Indo-European
## 4 Abruzzese… Abruzz… Southern Euro… "Italy" NA Indo-European
## 5 Acehnese Bahsa … Southeastern … "Indon… 3500000 Austronesian
## 6 Acehnese Bahsa … Southeastern … "Indon… 3500000 Austronesian
## 7 Adjoukrou <NA> Western Africa "Ivory… 140000 Atlantic-Congo
## 8 Adyghe <NA> Western Asia "Turke… 117500 Abkhaz-Adyge
## 9 Afenmai Afenmai Western Africa "Niger… 270000 Atlantic-Congo
## 10 African-A… Black … Northern Amer… "Unite… 45109521 Indo-European
## # ℹ 1,292 more rows
## # ℹ 3 more variables: Location <chr>, Size <chr>, Status <chr>data$Country## [1] "Cuba"
## [2] "Turkey,\r\nRussia"
## [3] "Italy"
## [4] "Italy"
## [5] "Indonesia"
## [6] "Indonesia"
## [7] "Ivory Coast"
## [8] "Turkey,\r\nRussia"
## [9] "Nigeria"
## [10] "United States"
## [11] "United States"
## [12] "United States"
## [13] "United States"
## [14] "United States"
## [15] "United States"
## [16] "United States"
## [17] "South Africa,\r\nZimbabwe"
## [18] "Ghana"
## [19] "Ghana"
## [20] "Ghana"
## [21] "Ghana"
## [22] "Philippines"
## [23] "Algeria,\r\nEgypt"
## [24] "Algeria,\r\nEgypt"
## [25] "Algeria,\r\nFrance,\r\nIsrael"
## [26] "France"
## [27] "China,\r\nIndia"
## [28] "China,\r\nIndia"
## [29] "United States"
## [30] "United States"
## [31] "United States"
## [32] "United States"
## [33] "United States"
## [34] "Ethiopia"
## [35] "Ethiopia"
## [36] "Ethiopia"
## [37] "Mexico"
## [38] "Nigeria"
## [39] "Greece"
## [40] "Antigua and Barbuda"
## [41] "India"
## [42] "Ghana,\r\nIvory Coast"
## [43] "Italy"
## [44] "Italy"
## [45] "Italy"
## [46] "Italy"
## [47] "Italy"
## [48] "Argentina"
## [49] "Romania,\r\nGreece,\r\nAlbania"
## [50] "Romania,\r\nGreece,\r\nAlbania"
## [51] "Ghana"
## [52] "Ghana"
## [53] "Ghana"
## [54] "India"
## [55] "Iraq,\r\nSyria"
## [56] "Spain,\r\nPortugal"
## [57] "Australia"
## [58] "Austria"
## [59] "Austria"
## [60] "Russia,\r\nAzerbaijan"
## [61] "India,\r\nIran"
## [62] "Bolivia,\r\nPeru"
## [63] "Azerbaijan,\r\nRussia"
## [64] "Azerbaijan,\r\nRussia"
## [65] "Azerbaijan,\r\nRussia"
## [66] "Cameroon"
## [67] "Bahamas"
## [68] "Nepal"
## [69] "Senegal"
## [70] "Indonesia"
## [71] "North Macedonia,\r\nSerbia"
## [72] "Pakistan,\r\nIran"
## [73] "Pakistan,\r\nIndia"
## [74] "Pakistan,\r\nIndia"
## [75] "Mali,\r\nIvory Coast"
## [76] "Mali,\r\nIvory Coast"
## [77] "Mali,\r\nIvory Coast"
## [78] "Philippines,\r\nMalaysia"
## [79] "Indonesia,\r\nMalaysia"
## [80] "Nepal,\r\nIndia"
## [81] "Ivory Coast"
## [82] "Ivory Coast"
## [83] "Ivory Coast"
## [84] "Barbados"
## [85] "Barbados"
## [86] "Tajikistan,\r\nAfghanistan"
## [87] "Cameroon"
## [88] "Spain,\r\nFrance"
## [89] "Spain,\r\nFrance"
## [90] "Spain,\r\nFrance"
## [91] "Liberia,\r\nSierra Leone"
## [92] "Indonesia"
## [93] "Indonesia"
## [94] "Indonesia"
## [95] "Austria,\r\nGermany"
## [96] "Austria,\r\nGermany"
## [97] "Senegal"
## [98] "Belarus,\r\nPoland"
## [99] "Belarus,\r\nPoland"
## [100] "Belarus,\r\nPoland"
## [101] "Belarus,\r\nPoland"
## [102] "Belize"
## [103] "Zambia,\r\nD.R. Congo"
## [104] "Italy"
## [105] "Bangladesh,\r\nIndia"
## [106] "Bangladesh,\r\nIndia"
## [107] "Bangladesh,\r\nIndia"
## [108] "Bangladesh,\r\nIndia"
## [109] "Bangladesh,\r\nIndia"
## [110] "Bangladesh,\r\nIndia"
## [111] "Bangladesh,\r\nIndia"
## [112] "Indonesia"
## [113] "India,\r\nNepal"
## [114] "India,\r\nNepal"
## [115] "Israel"
## [116] "Israel"
## [117] "Israel"
## [118] "Philippines"
## [119] "Philippines"
## [120] "India,\r\nBangladesh"
## [121] "Vanuatu,\r\nNew Caledonia"
## [122] "United States"
## [123] "Bolivia"
## [124] "Bolivia"
## [125] "Bolivia"
## [126] "Mali,\r\nBurkina Faso"
## [127] "Philippines"
## [128] "Bosnia and Herzegovina,\r\nSerbia"
## [129] "Bosnia and Herzegovina,\r\nSerbia"
## [130] "Bosnia and Herzegovina,\r\nSerbia"
## [131] "Brazil"
## [132] "Brazil"
## [133] "Brazil"
## [134] "Brazil"
## [135] "France"
## [136] "France"
## [137] "France"
## [138] "Costa Rica"
## [139] "United Kingdom"
## [140] "Indonesia,\r\nMalaysia"
## [141] "Indonesia,\r\nMalaysia"
## [142] "Israel,\r\nUnited States,\r\nUzbekistan"
## [143] "Israel,\r\nUnited States,\r\nUzbekistan"
## [144] "Israel,\r\nUnited States,\r\nUzbekistan"
## [145] "Bulgaria,\r\nTurkey"
## [146] "Bulgaria,\r\nTurkey"
## [147] "Turkey,\r\nBulgaria"
## [148] "Ghana"
## [149] "Bhutan"
## [150] "Myanmar"
## [151] "Myanmar"
## [152] "Myanmar"
## [153] "Myanmar"
## [154] "Pakistan"
## [155] "Russia"
## [156] "Turkey,\r\nRussia"
## [157] "Ivory Coast"
## [158] "Italy"
## [159] "Italy"
## [160] "Italy"
## [161] "Italy"
## [162] "Cameroon"
## [163] "Cameroon"
## [164] "Canada"
## [165] "China,\r\nHong Kong"
## [166] "China,\r\nHong Kong"
## [167] "China,\r\nHong Kong"
## [168] "China,\r\nHong Kong"
## [169] "China,\r\nHong Kong"
## [170] "China,\r\nHong Kong"
## [171] "Cape Verde Islands"
## [172] "Cape Verde Islands"
## [173] "Trinidad and Tobago,\r\nGuyana"
## [174] "Spain"
## [175] "Spain"
## [176] "Spain"
## [177] "Spain,\r\nFrance,\r\nAndorra"
## [178] "Philippines"
## [179] "Philippines"
## [180] "Honduras,\r\nGuatemala,\r\nEl Salvador,\r\nNicaragua,\r\nCosta Rica"
## [181] "Honduras,\r\nGuatemala,\r\nEl Salvador,\r\nNicaragua,\r\nCosta Rica"
## [182] "Honduras,\r\nGuatemala,\r\nEl Salvador,\r\nNicaragua,\r\nCosta Rica"
## [183] "Honduras,\r\nGuatemala,\r\nEl Salvador,\r\nNicaragua,\r\nCosta Rica"
## [184] "Honduras,\r\nGuatemala,\r\nEl Salvador,\r\nNicaragua,\r\nCosta Rica"
## [185] "Honduras,\r\nGuatemala,\r\nEl Salvador,\r\nNicaragua,\r\nCosta Rica"
## [186] "Indonesia"
## [187] "Chad"
## [188] "Bangladesh,\r\nMyanmar"
## [189] "China,\r\nMongolia"
## [190] "Bangladesh,\r\nIndia"
## [191] "Iraq"
## [192] "Nepal"
## [193] "United States"
## [194] "India"
## [195] "China"
## [196] "Nepal"
## [197] "Algeria,\r\nTunisia"
## [198] "Philippines"
## [199] "Russia"
## [200] "Russia"
## [201] "Ghana"
## [202] "United States"
## [203] "Malawi,\r\nZambia"
## [204] "Uganda"
## [205] "Chile"
## [206] "Mexico"
## [207] "Mexico"
## [208] "United States"
## [209] "Bangladesh"
## [210] "Bhutan"
## [211] "Guatemala"
## [212] "Russia"
## [213] "Russia"
## [214] "Micronesia"
## [215] "Russia"
## [216] "Italy"
## [217] "Italy"
## [218] "Italy"
## [219] "Egypt,\r\nYemen"
## [220] "Egypt,\r\nYemen"
## [221] "Egypt,\r\nYemen"
## [222] "Egypt,\r\nYemen"
## [223] "Armenia"
## [224] "Armenia"
## [225] "Italy"
## [226] "China,\r\nIndia"
## [227] "China,\r\nIndia"
## [228] "Colombia"
## [229] "Colombia"
## [230] "Colombia"
## [231] "Comoros"
## [232] "Egypt,\r\nSudan"
## [233] "Egypt,\r\nSudan"
## [234] "Egypt,\r\nSudan"
## [235] "Greece"
## [236] "Ukraine,\r\nTurkey,\r\nUzbekistan"
## [237] "Croatia,\r\nSlovenia"
## [238] "Croatia,\r\nSlovenia"
## [239] "Croatia,\r\nSlovenia"
## [240] "Cuba"
## [241] "Cuba"
## [242] "Cuba"
## [243] "Mexico"
## [244] "Cyprus,\r\nGreece"
## [245] "Cyprus,\r\nTurkey"
## [246] "Czech Republic,\r\nSlovakia"
## [247] "Czech Republic,\r\nSlovakia"
## [248] "Ghana"
## [249] "Ghana"
## [250] "United States"
## [251] "Ghana"
## [252] "Denmark,\r\nSweden"
## [253] "Denmark,\r\nSweden"
## [254] "Hungary,\r\nRomania"
## [255] "Sudan"
## [256] "Afghanistan,\r\nPakistan"
## [257] "Afghanistan,\r\nPakistan"
## [258] "Afghanistan,\r\nPakistan"
## [259] "Myanmar"
## [260] "Myanmar"
## [261] "India"
## [262] "Maldives,\r\nIndia"
## [263] "Sudan,\r\nSouth Sudan"
## [264] "Nepal"
## [265] "Dominica"
## [266] "Dominica"
## [267] "Dominican Republic"
## [268] "Dominican Republic"
## [269] "Dominican Republic"
## [270] "Dominican Republic"
## [271] "Dominican Republic"
## [272] "Dominican Republic"
## [273] "Dominican Republic"
## [274] "China"
## [275] "Cameroon"
## [276] "Kyrgyzstan,\r\nKazakhstan"
## [277] "Netherlands,\r\nBelgium"
## [278] "Netherlands,\r\nBelgium"
## [279] "Netherlands,\r\nBelgium"
## [280] "Netherlands,\r\nBelgium"
## [281] "Ivory Coast,\r\nBurkina Faso"
## [282] "Ivory Coast,\r\nBurkina Faso"
## [283] "Ivory Coast,\r\nBurkina Faso"
## [284] "Nepal"
## [285] "Nepal"
## [286] "Nepal"
## [287] "Bhutan,\r\nIndia"
## [288] "Bhutan,\r\nIndia"
## [289] "Armenia,\r\nRussia"
## [290] "Ivory Coast"
## [291] "Vatican City"
## [292] "Vatican City"
## [293] "Ecuador"
## [294] "Ecuador"
## [295] "Ecuador"
## [296] "Ecuador"
## [297] "Ecuador"
## [298] "Ecuador"
## [299] "Ecuador"
## [300] "Ecuador"
## [301] "Nigeria"
## [302] "Nigeria"
## [303] "Nigeria"
## [304] "Nigeria"
## [305] "Egypt"
## [306] "Egypt"
## [307] "Egypt"
## [308] "Egypt"
## [309] "Egypt"
## [310] "Egypt,\r\nIsrael"
## [311] "Italy"
## [312] "Italy"
## [313] "Nigeria"
## [314] "France,\r\nBrazil"
## [315] "Estonia"
## [316] "Estonia"
## [317] "Ghana,\r\nTogo"
## [318] "Ghana,\r\nTogo"
## [319] "Cameroon"
## [320] "Myanmar,\r\nIndia"
## [321] "Myanmar,\r\nIndia"
## [322] "Equatorial Guinea,\r\nGabon"
## [323] "Ghana"
## [324] "Cameroon"
## [325] "Fiji"
## [326] "Finland,\r\nSweden"
## [327] "Finland,\r\nSweden"
## [328] "Finland,\r\nSweden"
## [329] "Belgium"
## [330] "Benin,\r\nTogo"
## [331] "Ghana,\r\nBurkina Faso"
## [332] "France,\r\nItaly"
## [333] "Germany"
## [334] "France,\r\nSenegal"
## [335] "France,\r\nSenegal"
## [336] "France,\r\nSenegal"
## [337] "France,\r\nSenegal"
## [338] "France,\r\nSenegal"
## [339] "France,\r\nSenegal"
## [340] "France,\r\nSenegal"
## [341] "French Guiana"
## [342] "Netherlands"
## [343] "Italy"
## [344] "Italy"
## [345] "China,\r\nTaiwan"
## [346] "China,\r\nTaiwan"
## [347] "China,\r\nTaiwan"
## [348] "China,\r\nTaiwan"
## [349] "Guinea,\r\nSenegal"
## [350] "Guinea,\r\nSenegal"
## [351] "Guinea,\r\nSenegal"
## [352] "Sudan,\r\nChad"
## [353] "Ghana"
## [354] "Ivory Coast"
## [355] "Spain,\r\nPortugal"
## [356] "Spain,\r\nPortugal"
## [357] "Spain,\r\nPortugal"
## [358] "Spain,\r\nPortugal"
## [359] "Italy"
## [360] "China"
## [361] "Honduras,\r\nBelize,\r\nGuatemala"
## [362] "Honduras,\r\nBelize,\r\nGuatemala"
## [363] "Honduras,\r\nBelize,\r\nGuatemala"
## [364] "Honduras,\r\nBelize,\r\nGuatemala"
## [365] "India,\r\nBangladesh"
## [366] "Albania,\r\nKosovo,\r\nMontenegro,\r\nNorth Macedonia"
## [367] "Albania,\r\nKosovo,\r\nMontenegro,\r\nNorth Macedonia"
## [368] "Albania,\r\nKosovo,\r\nMontenegro,\r\nNorth Macedonia"
## [369] "Albania,\r\nKosovo,\r\nMontenegro,\r\nNorth Macedonia"
## [370] "Albania,\r\nKosovo,\r\nMontenegro,\r\nNorth Macedonia"
## [371] "Togo,\r\nBenin"
## [372] "Georgia,\r\nTurkey"
## [373] "Georgia,\r\nTurkey"
## [374] "Georgia,\r\nTurkey"
## [375] "Germany,\r\nAustria,\r\nSwitzerland"
## [376] "Germany,\r\nAustria,\r\nSwitzerland"
## [377] "Germany,\r\nAustria,\r\nSwitzerland"
## [378] "Germany,\r\nAustria,\r\nSwitzerland"
## [379] "Germany,\r\nAustria,\r\nSwitzerland"
## [380] "Ethiopia,\r\nEritrea"
## [381] "Ethiopia,\r\nEritrea"
## [382] "Nepal"
## [383] "Ghana"
## [384] "Cameroon"
## [385] "Kenya,\r\nTanzania"
## [386] "Kenya,\r\nTanzania"
## [387] "Kiribati"
## [388] "Ivory Coast,\r\nLiberia"
## [389] "Liberia,\r\nSierra Leone"
## [390] "Slovenia"
## [391] "Burkina Faso,\r\nTogo"
## [392] "Greece,\r\nCyprus"
## [393] "Greece,\r\nCyprus"
## [394] "Greece,\r\nCyprus"
## [395] "Greece,\r\nCyprus"
## [396] "Greece,\r\nCyprus"
## [397] "Grenada"
## [398] "Grenada"
## [399] "Guadeloupe,\r\nFrance"
## [400] "Paraguay"
## [401] "Paraguay"
## [402] "Ivory Coast"
## [403] "Guinea-Bissau,\r\nSenegal"
## [404] "India"
## [405] "India"
## [406] "India"
## [407] "India"
## [408] "Kuwait,\r\nUnited Arab Emirates,\r\nSaudi Arabia"
## [409] "United States"
## [410] "United States"
## [411] "Benin,\r\nNigeria"
## [412] "Ethiopia"
## [413] "India,\r\nPakistan"
## [414] "Ivory Coast"
## [415] "Nepal,\r\nIndia"
## [416] "Nepal,\r\nIndia"
## [417] "Guyana"
## [418] "Guyana"
## [419] "Guyana"
## [420] "Guyana"
## [421] "Nepal"
## [422] "China,\r\nTaiwan"
## [423] "Haiti,\r\nDominican Republic"
## [424] "Haiti,\r\nDominican Republic"
## [425] "Haiti,\r\nDominican Republic"
## [426] "Haiti,\r\nDominican Republic"
## [427] "Haiti,\r\nDominican Republic"
## [428] "Morocco,\r\nIsrael"
## [429] "Morocco,\r\nIsrael"
## [430] "Myanmar,\r\nIndia"
## [431] "China,\r\nTaiwan"
## [432] "China,\r\nTaiwan"
## [433] "China,\r\nSouth Korea,\r\nNorth Korea"
## [434] "United States,\r\nIsrael"
## [435] "United States,\r\nIsrael"
## [436] "United States,\r\nIsrael"
## [437] "United States,\r\nIsrael"
## [438] "Mauritania"
## [439] "Mauritania"
## [440] "Nigeria,\r\nNiger"
## [441] "Nigeria,\r\nNiger"
## [442] "Nigeria,\r\nNiger"
## [443] "Nigeria,\r\nNiger"
## [444] "United States"
## [445] "United States"
## [446] "Afghanistan,\r\nPakistan"
## [447] "Israel"
## [448] "Israel"
## [449] "Israel"
## [450] "Israel"
## [451] "Israel"
## [452] "Israel"
## [453] "Namibia,\r\nBotswana"
## [454] "United States"
## [455] "India,\r\nNepal"
## [456] "India,\r\nNepal"
## [457] "India,\r\nNepal"
## [458] "India,\r\nNepal"
## [459] "India,\r\nNepal"
## [460] "Papua New Guinea"
## [461] "Vietnam,\r\nChina"
## [462] "China,\r\nTaiwan"
## [463] "United States"
## [464] "China"
## [465] "Hungary,\r\nRomania"
## [466] "Hungary,\r\nRomania"
## [467] "Hungary,\r\nRomania"
## [468] "Hungary,\r\nRomania"
## [469] "Nepal"
## [470] "Philippines"
## [471] "Philippines"
## [472] "Philippines"
## [473] "Nigeria"
## [474] "Iceland"
## [475] "Nigeria"
## [476] "Nigeria"
## [477] "Nigeria"
## [478] "Nigeria"
## [479] "Nigeria"
## [480] "Philippines"
## [481] "Philippines"
## [482] "Philippines"
## [483] "Philippines"
## [484] "India"
## [485] "Indonesia"
## [486] "Indonesia"
## [487] "Russia,\r\nKazakhstan"
## [488] "Myanmar"
## [489] "Myanmar"
## [490] "Canada,\r\nGreenland"
## [491] "Philippines"
## [492] "Iraq"
## [493] "Iraq,\r\nIsrael"
## [494] "Iraq,\r\nIsrael"
## [495] "Ireland,\r\nUnited Kingdom"
## [496] "Ireland,\r\nUnited Kingdom"
## [497] "Ireland,\r\nUnited Kingdom"
## [498] "Ireland,\r\nUnited Kingdom"
## [499] "Ireland,\r\nUnited States"
## [500] "Ireland,\r\nUnited States"
## [501] "Ireland,\r\nUnited States"
## [502] "Ireland,\r\nUnited States"
## [503] "Ireland,\r\nUnited States"
## [504] "Italy"
## [505] "Italy"
## [506] "Thailand"
## [507] "Afghanistan,\r\nTajikistan"
## [508] "Israel"
## [509] "Croatia,\r\nItaly"
## [510] "Croatia"
## [511] "Croatia"
## [512] "Croatia"
## [513] "Croatia,\r\nItaly"
## [514] "Italy"
## [515] "Italy"
## [516] "Italy"
## [517] "Italy"
## [518] "Italy"
## [519] "Italy"
## [520] "United States"
## [521] "United States"
## [522] "United States"
## [523] "United States"
## [524] "United States"
## [525] "Guatemala"
## [526] "India"
## [527] "Jamaica"
## [528] "Jamaica"
## [529] "Jamaica"
## [530] "Jamaica"
## [531] "Jamaica"
## [532] "Jamaica"
## [533] "Japan"
## [534] "Japan"
## [535] "Japan"
## [536] "Japan"
## [537] "Japan"
## [538] "Indonesia"
## [539] "South Korea,\r\nJapan"
## [540] "United States"
## [541] "Israel,\r\nUnited States"
## [542] "Israel,\r\nUnited States"
## [543] "United States"
## [544] "United States"
## [545] "United States"
## [546] "United States"
## [547] "United States"
## [548] "Iran,\r\nIsrael"
## [549] "Iran,\r\nIsrael"
## [550] "Iran,\r\nIsrael"
## [551] "Russia,\r\nUkraine"
## [552] "Senegal,\r\nGambia,\r\nGuinea-Bissau"
## [553] "South Sudan"
## [554] "Ukraine,\r\nRussia"
## [555] "Georgia,\r\nIsrael"
## [556] "Greece,\r\nIsrael"
## [557] "Iran,\r\nIsrael"
## [558] "Iran,\r\nIsrael"
## [559] "Iran,\r\nIsrael"
## [560] "Iran,\r\nIsrael"
## [561] "Iran,\r\nIsrael"
## [562] "Iran,\r\nIsrael"
## [563] "Turkey,\r\nIsrael"
## [564] "Turkey,\r\nIsrael"
## [565] "Turkey,\r\nIsrael"
## [566] "Turkey,\r\nIsrael"
## [567] "Turkey,\r\nIsrael"
## [568] "Azerbaijan,\r\nRussia,\r\nIsrael"
## [569] "Guatemala"
## [570] "Guatemala"
## [571] "Guatemala"
## [572] "Russia,\r\nTurkey"
## [573] "Togo,\r\nBenin"
## [574] "Afghanistan"
## [575] "Algeria"
## [576] "Myanmar,\r\nChina"
## [577] "Malaysia"
## [578] "Nepal"
## [579] "Nigeria"
## [580] "Pakistan"
## [581] "Romania,\r\nUkraine"
## [582] "Russia,\r\nMongolia"
## [583] "Russia,\r\nMongolia"
## [584] "Afghanistan"
## [585] "India"
## [586] "India"
## [587] "Guatemala"
## [588] "Guatemala"
## [589] "Guatemala"
## [590] "Guatemala"
## [591] "Guatemala"
## [592] "Russia"
## [593] "Russia"
## [594] "Uzbekistan"
## [595] "Myanmar,\r\nThailand"
## [596] "Myanmar,\r\nThailand"
## [597] "Myanmar,\r\nThailand"
## [598] "Indonesia"
## [599] "India,\r\nPakistan"
## [600] "India,\r\nPakistan"
## [601] "Mali,\r\nSenegal"
## [602] "Kazakhstan,\r\nChina"
## [603] "Kazakhstan,\r\nChina"
## [604] "Nepal"
## [605] "Mongolia,\r\nRussia"
## [606] "Nepal"
## [607] "China,\r\nIndia"
## [608] "China,\r\nIndia"
## [609] "Bhutan"
## [610] "Cambodia,\r\nVietnam"
## [611] "Cambodia,\r\nVietnam"
## [612] "Pakistan,\r\nIndia"
## [613] "D.R. Congo,\r\nCongo (Brazzaville)"
## [614] "D.R. Congo,\r\nCongo (Brazzaville)"
## [615] "Angola"
## [616] "Philippines"
## [617] "Rwanda,\r\nUganda"
## [618] "Rwanda,\r\nUganda"
## [619] "Burundi"
## [620] "Liberia"
## [621] "Congo (Brazzaville)"
## [622] "India"
## [623] "Greece"
## [624] "Greece"
## [625] "India"
## [626] "India"
## [627] "Guinea,\r\nLiberia"
## [628] "South Korea,\r\nNorth Korea"
## [629] "South Korea,\r\nNorth Korea"
## [630] "South Korea,\r\nNorth Korea"
## [631] "South Korea,\r\nNorth Korea"
## [632] "South Korea,\r\nNorth Korea"
## [633] "Uzbekistan,\r\nRussia"
## [634] "Uzbekistan,\r\nRussia"
## [635] "Gabon,\r\nCongo (Brazzaville)"
## [636] "Guinea"
## [637] "Liberia"
## [638] "Liberia,\r\nIvory Coast"
## [639] "Liberia,\r\nIvory Coast"
## [640] "Nepal"
## [641] "Mexico,\r\nUnited States"
## [642] "Panama,\r\nColombia"
## [643] "Sierra Leone,\r\nGuinea"
## [644] "Syria,\r\nTurkey"
## [645] "Syria,\r\nTurkey"
## [646] "Bhutan"
## [647] "India"
## [648] "China,\r\nNepal"
## [649] "Kyrgyzstan,\r\nChina"
## [650] "India,\r\nChina"
## [651] "Myanmar,\r\nThailand"
## [652] "Myanmar,\r\nThailand"
## [653] "United States,\r\nCanada"
## [654] "Cameroon"
## [655] "Laos,\r\nCambodia"
## [656] "Laos,\r\nCambodia"
## [657] "Ghana"
## [658] "Latvia"
## [659] "Latvia"
## [660] "Turkey,\r\nGeorgia"
## [661] "Ukraine,\r\nPoland"
## [662] "Ukraine,\r\nPoland"
## [663] "Ukraine,\r\nPoland"
## [664] "Canada,\r\nUnited States"
## [665] "Canada,\r\nUnited States"
## [666] "Canada,\r\nUnited States"
## [667] "Canada,\r\nUnited States"
## [668] "Canada,\r\nUnited States"
## [669] "Canada,\r\nUnited States"
## [670] "Canada,\r\nUnited States"
## [671] "Canada,\r\nUnited States"
## [672] "United States"
## [673] "Russia,\r\nAzerbaijan"
## [674] "Liberia"
## [675] "Libya,\r\nEgypt"
## [676] "Libya,\r\nIsrael,\r\nItaly"
## [677] "Italy,\r\nMonaco"
## [678] "Sierra Leone"
## [679] "Nepal,\r\nIndia"
## [680] "Cameroon"
## [681] "Nepal,\r\nChina"
## [682] "D.R. Congo,\r\nCongo (Brazzaville)"
## [683] "Lithuania,\r\nPoland"
## [684] "Lithuania,\r\nPoland"
## [685] "Lithuania,\r\nPoland"
## [686] "United States,\r\nIsrael"
## [687] "United States,\r\nIsrael"
## [688] "Nepal"
## [689] "Nepal"
## [690] "Nepal"
## [691] "Liberia"
## [692] "Italy,\r\nSwitzerland"
## [693] "India"
## [694] "Romania"
## [695] "Germany"
## [696] "D.R. Congo"
## [697] "D.R. Congo"
## [698] "Italy"
## [699] "Italy"
## [700] "Uganda"
## [701] "Cuba,\r\nDominican Republic"
## [702] "Cuba,\r\nDominican Republic"
## [703] "United States"
## [704] "Kenya,\r\nTanzania"
## [705] "Iran"
## [706] "Luxembourg,\r\nFrance"
## [707] "North Macedonia,\r\nAlbania"
## [708] "North Macedonia,\r\nAlbania"
## [709] "North Macedonia,\r\nAlbania"
## [710] "North Macedonia,\r\nAlbania"
## [711] "Serbia"
## [712] "Indonesia"
## [713] "Indonesia"
## [714] "Nepal"
## [715] "Philippines"
## [716] "Ivory Coast"
## [717] "India,\r\nNepal"
## [718] "India,\r\nNepal"
## [719] "Indonesia"
## [720] "Indonesia"
## [721] "Madagascar"
## [722] "Madagascar"
## [723] "Madagascar"
## [724] "Malaysia,\r\nBrunei,\r\nSingapore"
## [725] "Malaysia,\r\nBrunei,\r\nSingapore"
## [726] "India"
## [727] "India"
## [728] "India"
## [729] "India"
## [730] "Malta"
## [731] "Guatemala,\r\nMexico"
## [732] "Guatemala,\r\nMexico"
## [733] "Guatemala,\r\nMexico"
## [734] "Guatemala,\r\nMexico"
## [735] "Guatemala,\r\nMexico"
## [736] "Indonesia"
## [737] "Indonesia"
## [738] "Nepal"
## [739] "China,\r\nTaiwan"
## [740] "China,\r\nTaiwan"
## [741] "China,\r\nTaiwan"
## [742] "China,\r\nTaiwan"
## [743] "China,\r\nTaiwan"
## [744] "China,\r\nTaiwan"
## [745] "China,\r\nTaiwan"
## [746] "Liberia"
## [747] "Senegal,\r\nGambia"
## [748] "Senegal,\r\nGambia"
## [749] "Senegal,\r\nGambia"
## [750] "Guinea-Bissau,\r\nSenegal"
## [751] "Indonesia"
## [752] "Guinea,\r\nIvory Coast"
## [753] "Guinea,\r\nIvory Coast"
## [754] "Guinea,\r\nIvory Coast"
## [755] "Guinea,\r\nIvory Coast"
## [756] "Liberia,\r\nGuinea"
## [757] "Chile,\r\nArgentina"
## [758] "Philippines"
## [759] "Philippines"
## [760] "India"
## [761] "India"
## [762] "India"
## [763] "Italy"
## [764] "Burkina Faso,\r\nMali"
## [765] "Bangladesh,\r\nIndia"
## [766] "Marshall Islands"
## [767] "Martinique,\r\nFrance"
## [768] "India"
## [769] "Sudan,\r\nChad"
## [770] "United States"
## [771] "Mauritius"
## [772] "Mexico"
## [773] "Mexico"
## [774] "Iran"
## [775] "Mexico"
## [776] "Cameroon"
## [777] "India,\r\nBangladesh"
## [778] "Pakistan,\r\nIndia"
## [779] "Sierra Leone,\r\nLiberia"
## [780] "Sierra Leone,\r\nLiberia"
## [781] "Sierra Leone,\r\nLiberia"
## [782] "Mexico"
## [783] "Mexico"
## [784] "Mexico"
## [785] "Mexico"
## [786] "Mexico"
## [787] "Mexico"
## [788] "Mexico"
## [789] "China,\r\nVietnam"
## [790] "Indonesia"
## [791] "Georgia"
## [792] "Mexico"
## [793] "Mexico"
## [794] "Mexico"
## [795] "Mexico"
## [796] "Mexico"
## [797] "Mexico"
## [798] "Mexico"
## [799] "Canada,\r\nUnited States"
## [800] "United States"
## [801] "United States"
## [802] "United States"
## [803] "Moldova,\r\nRomania"
## [804] "Moldova,\r\nRomania"
## [805] "Italy"
## [806] "Italy"
## [807] "Myanmar,\r\nThailand"
## [808] "D.R. Congo"
## [809] "China"
## [810] "United States"
## [811] "Montenegro,\r\nSerbia"
## [812] "Montenegro,\r\nSerbia"
## [813] "Montserrat"
## [814] "Morocco"
## [815] "Morocco"
## [816] "Morocco"
## [817] "Morocco,\r\nIsrael,\r\nFrance"
## [818] "Morocco,\r\nIsrael,\r\nFrance"
## [819] "Morocco,\r\nIsrael,\r\nFrance"
## [820] "Burkina Faso,\r\nMali"
## [821] "Burkina Faso,\r\nMali"
## [822] "Burkina Faso,\r\nMali"
## [823] "Burkina Faso,\r\nMali"
## [824] "Nepal,\r\nIndia"
## [825] "India"
## [826] "Gabon"
## [827] "New Zealand"
## [828] "Nepal"
## [829] "India"
## [830] "Mexico"
## [831] "Mexico"
## [832] "Mexico"
## [833] "Mexico"
## [834] "Mexico"
## [835] "Mexico"
## [836] "Mexico"
## [837] "Nepal"
## [838] "Panama,\r\nCosta Rica"
## [839] "United States,\r\nCanada"
## [840] "Nauru"
## [841] "United States"
## [842] "Zimbabwe,\r\nBotswana"
## [843] "Zimbabwe,\r\nBotswana"
## [844] "Suriname"
## [845] "Italy"
## [846] "Italy"
## [847] "Italy"
## [848] "Italy"
## [849] "Iran,\r\nIraq"
## [850] "Nepal,\r\nIndia"
## [851] "Nepal,\r\nIndia"
## [852] "Nepal,\r\nIndia"
## [853] "Nepal,\r\nIndia"
## [854] "Nepal"
## [855] "New Zealand"
## [856] "Nepal,\r\nIndia"
## [857] "Canada"
## [858] "Nigeria"
## [859] "China"
## [860] "Bangladesh"
## [861] "Italy"
## [862] "Italy"
## [863] "Germany"
## [864] "Syria,\r\nLebanon"
## [865] "Syria,\r\nLebanon"
## [866] "Syria,\r\nLebanon"
## [867] "Syria,\r\nLebanon"
## [868] "Syria,\r\nLebanon"
## [869] "China"
## [870] "China"
## [871] "China"
## [872] "South Africa,\r\nBotswana"
## [873] "Thailand,\r\nLaos"
## [874] "Norway"
## [875] "Norway"
## [876] "Norway"
## [877] "Sudan"
## [878] "Nepal"
## [879] "South Sudan,\r\nEthiopia"
## [880] "Italy,\r\nFrance"
## [881] "India"
## [882] "Canada,\r\nUnited States"
## [883] "Canada,\r\nUnited States"
## [884] "Japan"
## [885] "Ethiopia,\r\nKenya"
## [886] "Angola,\r\nNamibia"
## [887] "Russia,\r\nSyria"
## [888] "Mexico"
## [889] "Mexico"
## [890] "Mexico"
## [891] "Myanmar"
## [892] "Pakistan"
## [893] "Pakistan"
## [894] "Germany,\r\nFrance"
## [895] "Palau"
## [896] "Indonesia"
## [897] "Sri Lanka,\r\nThailand"
## [898] "Sri Lanka,\r\nThailand"
## [899] "Philippines"
## [900] "Philippines"
## [901] "Mali,\r\nBurkina Faso"
## [902] "Panama"
## [903] "Panama"
## [904] "Philippines"
## [905] "Philippines"
## [906] "Mexico"
## [907] "Curaçao,\r\nAruba"
## [908] "Paraguay"
## [909] "Paraguay"
## [910] "Pakistan,\r\nAfghanistan"
## [911] "Pakistan,\r\nAfghanistan"
## [912] "Pakistan,\r\nAfghanistan"
## [913] "Iran"
## [914] "Iran"
## [915] "Iran"
## [916] "Iran"
## [917] "Peru"
## [918] "Peru"
## [919] "Peru"
## [920] "Peru"
## [921] "Philippines"
## [922] "Philippines"
## [923] "Italy,\r\nArgentina"
## [924] "Italy,\r\nArgentina"
## [925] "Solomon Islands"
## [926] "India"
## [927] "Poland"
## [928] "Poland"
## [929] "Poland"
## [930] "Poland"
## [931] "Poland"
## [932] "Poland"
## [933] "Greece,\r\nTurkey"
## [934] "Greece,\r\nTurkey"
## [935] "Guatemala"
## [936] "Portugal,\r\nAngola"
## [937] "Portugal,\r\nAngola"
## [938] "Portugal,\r\nAngola"
## [939] "Portugal,\r\nAngola"
## [940] "Pakistan,\r\nIndia"
## [941] "United States"
## [942] "United States"
## [943] "United States"
## [944] "United States"
## [945] "United States"
## [946] "United States"
## [947] "United States"
## [948] "United States"
## [949] "Italy"
## [950] "Italy"
## [951] "Italy"
## [952] "Italy"
## [953] "Italy"
## [954] "Italy"
## [955] "Italy"
## [956] "Italy"
## [957] "Italy"
## [958] "Italy"
## [959] "India,\r\nPakistan"
## [960] "India,\r\nPakistan"
## [961] "India,\r\nPakistan"
## [962] "India,\r\nPakistan"
## [963] "India,\r\nPakistan"
## [964] "India"
## [965] "Guatemala"
## [966] "Guatemala,\r\nBelize"
## [967] "Canada"
## [968] "United States"
## [969] "Myanmar,\r\nBangladesh"
## [970] "Myanmar,\r\nBangladesh"
## [971] "Nepal,\r\nIndia,\r\nChina"
## [972] "Bangladesh,\r\nIndia"
## [973] "Iran"
## [974] "San Marino"
## [975] "Hungary,\r\nRomania,\r\nUkraine"
## [976] "Hungary,\r\nRomania,\r\nUkraine"
## [977] "Romania,\r\nMoldova"
## [978] "Romania,\r\nMoldova"
## [979] "Romania,\r\nMoldova"
## [980] "Switzerland"
## [981] "Tajikistan,\r\nAfghanistan"
## [982] "Tajikistan,\r\nAfghanistan"
## [983] "Russia,\r\nUkraine"
## [984] "Russia,\r\nUkraine"
## [985] "Russia,\r\nUkraine"
## [986] "Russia,\r\nUkraine"
## [987] "Russia,\r\nUkraine"
## [988] "Russia,\r\nUkraine"
## [989] "Russia"
## [990] "Ukraine,\r\nSlovakia"
## [991] "Ukraine,\r\nSlovakia"
## [992] "Ukraine,\r\nSlovakia"
## [993] "Ukraine,\r\nSlovakia"
## [994] "Reunion"
## [995] "Norway,\r\nSweden"
## [996] "Samoa,\r\nUnited States"
## [997] "Nepal"
## [998] "Bangladesh"
## [999] "Central African Republic"
## [1000] "Iran"
## [1001] "India"
## [1002] "India,\r\nNepal"
## [1003] "India,\r\nNepal"
## [1004] "India,\r\nNepal"
## [1005] "Pakistan,\r\nAfghanistan"
## [1006] "Suriname"
## [1007] "Suriname"
## [1008] "Indonesia"
## [1009] "Indonesia"
## [1010] "United Kingdom"
## [1011] "United Kingdom"
## [1012] "United Kingdom"
## [1013] "Nepal"
## [1014] "Nepal"
## [1015] "India"
## [1016] "Ivory Coast,\r\nMali"
## [1017] "Ivory Coast,\r\nMali"
## [1018] "Serbia,\r\nBosnia and Herzegovina"
## [1019] "Serbia,\r\nBosnia and Herzegovina"
## [1020] "Serbia,\r\nBosnia and Herzegovina"
## [1021] "Senegal,\r\nGambia"
## [1022] "Senegal,\r\nGambia"
## [1023] "Seychelles"
## [1024] "Myanmar,\r\nThailand"
## [1025] "Myanmar,\r\nThailand"
## [1026] "Myanmar,\r\nThailand"
## [1027] "China"
## [1028] "China"
## [1029] "Turkey"
## [1030] "Bhutan,\r\nIndia"
## [1031] "Nepal,\r\nIndia"
## [1032] "Nepal,\r\nIndia"
## [1033] "Nepal,\r\nIndia"
## [1034] "Pakistan,\r\nIndia"
## [1035] "Pakistan,\r\nIndia"
## [1036] "United States"
## [1037] "Zimbabwe,\r\nZambia"
## [1038] "Ecuador"
## [1039] "Tajikistan,\r\nAfghanistan"
## [1040] "Tajikistan,\r\nAfghanistan"
## [1041] "Cameroon"
## [1042] "China"
## [1043] "Italy"
## [1044] "Italy"
## [1045] "Italy"
## [1046] "Italy"
## [1047] "Italy"
## [1048] "Italy"
## [1049] "Sierra Leone"
## [1050] "Sierra Leone"
## [1051] "Mexico"
## [1052] "Poland,\r\nCzech Republic"
## [1053] "Pakistan,\r\nIndia"
## [1054] "Pakistan,\r\nIndia"
## [1055] "Pakistan,\r\nIndia"
## [1056] "Singapore"
## [1057] "Sri Lanka"
## [1058] "Sri Lanka"
## [1059] "Sri Lanka"
## [1060] "Egypt"
## [1061] "Slovakia,\r\nCzech Republic"
## [1062] "Slovakia,\r\nCzech Republic"
## [1063] "Slovakia,\r\nCzech Republic"
## [1064] "Slovakia,\r\nCzech Republic"
## [1065] "Slovenia"
## [1066] "Slovenia"
## [1067] "Slovenia"
## [1068] "Somalia,\r\nEthiopia"
## [1069] "Mali,\r\nNiger"
## [1070] "Mali,\r\nNiger"
## [1071] "Mali,\r\nSenegal,\r\nGambia"
## [1072] "Mali,\r\nSenegal,\r\nGambia"
## [1073] "Iraq"
## [1074] "South Africa"
## [1075] "Israel,\r\nJordan"
## [1076] "Israel,\r\nJordan"
## [1077] "Italy"
## [1078] "United States"
## [1079] "United States"
## [1080] "Suriname"
## [1081] "Sri Lanka"
## [1082] "Sri Lanka"
## [1083] "Sri Lanka"
## [1084] "Sri Lanka"
## [1085] "Saint Kitts and Nevis"
## [1086] "Saint Lucia"
## [1087] "Saint Lucia"
## [1088] "Sudan,\r\nSouth Sudan"
## [1089] "Indonesia"
## [1090] "Indonesia"
## [1091] "Nepal"
## [1092] "Suriname,\r\nNetherlands"
## [1093] "Guinea,\r\nSierra Leone"
## [1094] "Guinea,\r\nSierra Leone"
## [1095] "Georgia,\r\nRussia"
## [1096] "Germany"
## [1097] "Tanzania,\r\nKenya"
## [1098] "Tanzania,\r\nKenya"
## [1099] "Tanzania,\r\nKenya"
## [1100] "Eswatini,\r\nSouth Africa"
## [1101] "Sweden,\r\nFinland"
## [1102] "Sweden,\r\nFinland"
## [1103] "Sweden,\r\nFinland"
## [1104] "Switzerland,\r\nFrance"
## [1105] "Bangladesh,\r\nIndia"
## [1106] "Bangladesh,\r\nIndia"
## [1107] "Bangladesh,\r\nIndia"
## [1108] "Bangladesh,\r\nIndia"
## [1109] "Bangladesh,\r\nIndia"
## [1110] "Syria,\r\nLebanon"
## [1111] "Syria,\r\nLebanon"
## [1112] "United States,\r\nIsrael,\r\nSyria"
## [1113] "United States,\r\nIsrael,\r\nSyria"
## [1114] "United States,\r\nIsrael,\r\nSyria"
## [1115] "India"
## [1116] "Philippines"
## [1117] "Philippines"
## [1118] "Philippines"
## [1119] "Philippines"
## [1120] "Philippines"
## [1121] "Philippines"
## [1122] "China"
## [1123] "China"
## [1124] "China"
## [1125] "Taiwan"
## [1126] "Taiwan"
## [1127] "Tajikistan,\r\nUzbekistan"
## [1128] "Tajikistan,\r\nUzbekistan"
## [1129] "Nepal,\r\nIndia"
## [1130] "Nepal,\r\nIndia"
## [1131] "India"
## [1132] "India"
## [1133] "India"
## [1134] "India"
## [1135] "Bangladesh"
## [1136] "India"
## [1137] "Morocco,\r\nAlgeria"
## [1138] "Morocco"
## [1139] "Russia,\r\nTurkey"
## [1140] "Russia,\r\nTurkey"
## [1141] "Philippines,\r\nMalaysia"
## [1142] "Papua New Guinea"
## [1143] "United States,\r\nDominican Republic"
## [1144] "Myanmar,\r\nIndia"
## [1145] "India"
## [1146] "India"
## [1147] "India"
## [1148] "Togo,\r\nGhana"
## [1149] "Sierra Leone"
## [1150] "Sierra Leone"
## [1151] "Sierra Leone"
## [1152] "China,\r\nThailand"
## [1153] "China,\r\nThailand"
## [1154] "Mexico"
## [1155] "Timor-Leste,\r\nIndonesia"
## [1156] "Thailand,\r\nCambodia"
## [1157] "Thailand,\r\nCambodia"
## [1158] "Thailand,\r\nCambodia"
## [1159] "Thailand,\r\nCambodia"
## [1160] "Nepal"
## [1161] "Nepal"
## [1162] "Nepal,\r\nIndia"
## [1163] "China,\r\nIndia"
## [1164] "China,\r\nIndia"
## [1165] "China,\r\nIndia"
## [1166] "China,\r\nIndia"
## [1167] "China,\r\nIndia"
## [1168] "China,\r\nIndia"
## [1169] "Eritrea,\r\nSudan"
## [1170] "Ethiopia,\r\nEritrea"
## [1171] "Ethiopia,\r\nEritrea"
## [1172] "Nigeria"
## [1173] "Mexico"
## [1174] "Mexico"
## [1175] "Trinidad and Tobago"
## [1176] "Papua New Guinea"
## [1177] "Nepal"
## [1178] "Zimbabwe,\r\nZambia"
## [1179] "Tonga"
## [1180] "Indonesia"
## [1181] "Albania"
## [1182] "Albania"
## [1183] "Albania"
## [1184] "Albania"
## [1185] "Albania"
## [1186] "Trinidad and Tobago"
## [1187] "Trinidad and Tobago"
## [1188] "Trinidad and Tobago"
## [1189] "Trinidad and Tobago"
## [1190] "India,\r\nBangladesh"
## [1191] "Mexico"
## [1192] "Nepal"
## [1193] "Botswana,\r\nSouth Africa"
## [1194] "Mali,\r\nNiger"
## [1195] "India"
## [1196] "Malawi,\r\nZambia"
## [1197] "Tunisia"
## [1198] "Tunisia,\r\nIsrael,\r\nFrance"
## [1199] "Turkey,\r\nBulgaria"
## [1200] "Turkey,\r\nBulgaria"
## [1201] "Turkey,\r\nBulgaria"
## [1202] "Turkey,\r\nBulgaria"
## [1203] "Turkmenistan,\r\nAfghanistan"
## [1204] "Turkey,\r\nSweden"
## [1205] "Italy"
## [1206] "Russia,\r\nMongolia"
## [1207] "Ghana"
## [1208] "Ghana"
## [1209] "Ghana"
## [1210] "Ghana"
## [1211] "Guatemala"
## [1212] "Guatemala"
## [1213] "Mexico"
## [1214] "China,\r\nIndia"
## [1215] "Ukraine"
## [1216] "Ukraine"
## [1217] "Ukraine"
## [1218] "Ukraine"
## [1219] "Ukraine"
## [1220] "Ukraine"
## [1221] "United Kingdom,\r\nIreland"
## [1222] "Angola"
## [1223] "United States"
## [1224] "Pakistan,\r\nIndia"
## [1225] "Pakistan,\r\nIndia"
## [1226] "Pakistan,\r\nIndia"
## [1227] "Pakistan,\r\nIndia"
## [1228] "Pakistan,\r\nIndia"
## [1229] "Pakistan,\r\nIndia"
## [1230] "Nigeria"
## [1231] "Uruguay"
## [1232] "China,\r\nKazakhstan"
## [1233] "China,\r\nKazakhstan"
## [1234] "Uzbekistan,\r\nTajikistan"
## [1235] "Uzbekistan,\r\nTajikistan"
## [1236] "Uzbekistan,\r\nTajikistan"
## [1237] "Liberia,\r\nSierra Leone"
## [1238] "Spain"
## [1239] "Italy"
## [1240] "Venezuela"
## [1241] "Vietnam,\r\nCambodia"
## [1242] "Vietnam,\r\nCambodia"
## [1243] "Vietnam,\r\nCambodia"
## [1244] "Vietnam,\r\nCambodia"
## [1245] "Saint Vincent and the Grenadines"
## [1246] "United States"
## [1247] "Russia,\r\nKazakhstan"
## [1248] "Myanmar"
## [1249] "Myanmar"
## [1250] "Myanmar"
## [1251] "Pakistan,\r\nTajikistan"
## [1252] "Ghana"
## [1253] "Belgium"
## [1254] "Nepal"
## [1255] "Philippines"
## [1256] "United Kingdom"
## [1257] "China"
## [1258] "China"
## [1259] "China"
## [1260] "Vanuatu"
## [1261] "Armenia,\r\nTurkey,\r\nLebanon"
## [1262] "Armenia,\r\nTurkey,\r\nLebanon"
## [1263] "Armenia,\r\nTurkey,\r\nLebanon"
## [1264] "Armenia,\r\nTurkey,\r\nLebanon"
## [1265] "Armenia,\r\nTurkey,\r\nLebanon"
## [1266] "Germany,\r\nFrance"
## [1267] "United States"
## [1268] "Senegal,\r\nMauritania"
## [1269] "Senegal,\r\nMauritania"
## [1270] "Senegal,\r\nMauritania"
## [1271] "Senegal,\r\nMauritania"
## [1272] "South Africa,\r\nLesotho"
## [1273] "Philippines"
## [1274] "Russia"
## [1275] "Cameroon"
## [1276] "Yemen"
## [1277] "Yemen"
## [1278] "Yemen"
## [1279] "Yemen,\r\nIsrael"
## [1280] "United States,\r\nIsrael"
## [1281] "United States,\r\nIsrael"
## [1282] "United States,\r\nIsrael"
## [1283] "United States,\r\nIsrael"
## [1284] "United States,\r\nIsrael"
## [1285] "Nigeria,\r\nBenin"
## [1286] "Nigeria,\r\nBenin"
## [1287] "Nigeria,\r\nBenin"
## [1288] "Nigeria,\r\nBenin"
## [1289] "China"
## [1290] "Mexico"
## [1291] "Sudan,\r\nChad"
## [1292] "Mexico"
## [1293] "Mexico"
## [1294] "Mexico"
## [1295] "Mexico"
## [1296] "Mexico"
## [1297] "Niger,\r\nNigeria"
## [1298] "Turkey"
## [1299] "Iran"
## [1300] "South Africa,\r\nLesotho"
## [1301] "Libya"
## [1302] "China,\r\nIndia"str_detect(data$Country, "Switzerland")## [1] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [13] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [25] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [37] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [49] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [61] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [73] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [85] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [97] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [109] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [121] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [133] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [145] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [157] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [169] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [181] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [193] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [205] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [217] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [229] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [241] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [253] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [265] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [277] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [289] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [301] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [313] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [325] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [337] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [349] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [361] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [373] FALSE FALSE TRUE TRUE TRUE TRUE TRUE FALSE FALSE FALSE FALSE FALSE
## [385] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [397] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [409] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [421] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [433] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [445] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [457] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [469] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [481] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [493] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [505] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [517] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [529] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [541] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [553] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [565] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [577] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [589] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [601] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [613] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [625] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [637] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [649] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [661] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [673] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [685] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [697] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [709] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [721] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [733] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [745] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [757] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [769] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [781] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [793] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [805] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [817] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [829] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [841] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [853] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [865] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [877] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [889] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [901] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [913] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [925] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [937] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [949] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [961] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [973] FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE FALSE FALSE FALSE FALSE
## [985] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [997] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1009] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1021] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1033] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1045] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1057] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1069] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1081] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1093] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE TRUE
## [1105] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1117] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1129] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1141] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1153] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1165] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1177] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1189] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1201] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1213] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1225] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1237] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1249] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1261] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1273] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1285] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1297] FALSE FALSE FALSE FALSE FALSE FALSEsum(str_detect(data$Country, "Switzerland"))## [1] 8mean(str_detect(data$Country, "Switzerland$"))## [1] 0.005376344data %>%
summarise(num_Switzerland = sum(str_detect(Country, "Switzerland")))## # A tibble: 1 × 1
## num_Switzerland
## <int>
## 1 8data## # A tibble: 1,302 × 9
## Language Endonym `World Region` Country `Global Speakers` `Language Family`
## <chr> <chr> <chr> <chr> <dbl> <chr>
## 1 Abakuá Abakuá Caribbean "Cuba" NA <NA>
## 2 Abaza Абаза Western Asia "Turke… 49800 Abkhaz-Adyge
## 3 Abruzzese… Abruzz… Southern Euro… "Italy" NA Indo-European
## 4 Abruzzese… Abruzz… Southern Euro… "Italy" NA Indo-European
## 5 Acehnese Bahsa … Southeastern … "Indon… 3500000 Austronesian
## 6 Acehnese Bahsa … Southeastern … "Indon… 3500000 Austronesian
## 7 Adjoukrou <NA> Western Africa "Ivory… 140000 Atlantic-Congo
## 8 Adyghe <NA> Western Asia "Turke… 117500 Abkhaz-Adyge
## 9 Afenmai Afenmai Western Africa "Niger… 270000 Atlantic-Congo
## 10 African-A… Black … Northern Amer… "Unite… 45109521 Indo-European
## # ℹ 1,292 more rows
## # ℹ 3 more variables: Location <chr>, Size <chr>, Status <chr>data %>%
mutate(col_Switzerland = str_extract(Country, "Switzerland")) %>%
select(Country, col_Switzerland) %>%
filter(!is.na(col_Switzerland))## # A tibble: 8 × 2
## Country col_Switzerland
## <chr> <chr>
## 1 "Germany,\r\nAustria,\r\nSwitzerland" Switzerland
## 2 "Germany,\r\nAustria,\r\nSwitzerland" Switzerland
## 3 "Germany,\r\nAustria,\r\nSwitzerland" Switzerland
## 4 "Germany,\r\nAustria,\r\nSwitzerland" Switzerland
## 5 "Germany,\r\nAustria,\r\nSwitzerland" Switzerland
## 6 "Italy,\r\nSwitzerland" Switzerland
## 7 "Switzerland" Switzerland
## 8 "Switzerland,\r\nFrance" Switzerlanddata## # A tibble: 1,302 × 9
## Language Endonym `World Region` Country `Global Speakers` `Language Family`
## <chr> <chr> <chr> <chr> <dbl> <chr>
## 1 Abakuá Abakuá Caribbean "Cuba" NA <NA>
## 2 Abaza Абаза Western Asia "Turke… 49800 Abkhaz-Adyge
## 3 Abruzzese… Abruzz… Southern Euro… "Italy" NA Indo-European
## 4 Abruzzese… Abruzz… Southern Euro… "Italy" NA Indo-European
## 5 Acehnese Bahsa … Southeastern … "Indon… 3500000 Austronesian
## 6 Acehnese Bahsa … Southeastern … "Indon… 3500000 Austronesian
## 7 Adjoukrou <NA> Western Africa "Ivory… 140000 Atlantic-Congo
## 8 Adyghe <NA> Western Asia "Turke… 117500 Abkhaz-Adyge
## 9 Afenmai Afenmai Western Africa "Niger… 270000 Atlantic-Congo
## 10 African-A… Black … Northern Amer… "Unite… 45109521 Indo-European
## # ℹ 1,292 more rows
## # ℹ 3 more variables: Location <chr>, Size <chr>, Status <chr>data %>%
mutate(col_France = str_replace(Country, "Switzerland", "France")) %>%
select(Country, col_France)## # A tibble: 1,302 × 2
## Country col_France
## <chr> <chr>
## 1 "Cuba" "Cuba"
## 2 "Turkey,\r\nRussia" "Turkey,\r\nRussia"
## 3 "Italy" "Italy"
## 4 "Italy" "Italy"
## 5 "Indonesia" "Indonesia"
## 6 "Indonesia" "Indonesia"
## 7 "Ivory Coast" "Ivory Coast"
## 8 "Turkey,\r\nRussia" "Turkey,\r\nRussia"
## 9 "Nigeria" "Nigeria"
## 10 "United States" "United States"
## # ℹ 1,292 more rowsdata## # A tibble: 1,302 × 9
## Language Endonym `World Region` Country `Global Speakers` `Language Family`
## <chr> <chr> <chr> <chr> <dbl> <chr>
## 1 Abakuá Abakuá Caribbean "Cuba" NA <NA>
## 2 Abaza Абаза Western Asia "Turke… 49800 Abkhaz-Adyge
## 3 Abruzzese… Abruzz… Southern Euro… "Italy" NA Indo-European
## 4 Abruzzese… Abruzz… Southern Euro… "Italy" NA Indo-European
## 5 Acehnese Bahsa … Southeastern … "Indon… 3500000 Austronesian
## 6 Acehnese Bahsa … Southeastern … "Indon… 3500000 Austronesian
## 7 Adjoukrou <NA> Western Africa "Ivory… 140000 Atlantic-Congo
## 8 Adyghe <NA> Western Asia "Turke… 117500 Abkhaz-Adyge
## 9 Afenmai Afenmai Western Africa "Niger… 270000 Atlantic-Congo
## 10 African-A… Black … Northern Amer… "Unite… 45109521 Indo-European
## # ℹ 1,292 more rows
## # ℹ 3 more variables: Location <chr>, Size <chr>, Status <chr>