data <- read_excel("../00_data/myData.xlsx")
data$country
## [1] "Argentina" "Argentina"
## [3] "Argentina" "Argentina"
## [5] "Argentina" "Argentina"
## [7] "Argentina" "Argentina"
## [9] "Argentina" "Argentina"
## [11] "Argentina" "Australia"
## [13] "Australia" "Australia"
## [15] "Australia" "Australia"
## [17] "Australia" "Australia"
## [19] "Australia" "Australia"
## [21] "Australia" "Australia"
## [23] "Albania" "Albania"
## [25] "Albania" "Albania"
## [27] "Albania" "Albania"
## [29] "Albania" "Albania"
## [31] "Albania" "Albania"
## [33] "Albania" "Iceland"
## [35] "Iceland" "Iceland"
## [37] "Iceland" "Iceland"
## [39] "Iceland" "Iceland"
## [41] "Iceland" "Iceland"
## [43] "Iceland" "Iceland"
## [45] "New Zealand" "New Zealand"
## [47] "New Zealand" "New Zealand"
## [49] "New Zealand" "New Zealand"
## [51] "New Zealand" "New Zealand"
## [53] "New Zealand" "New Zealand"
## [55] "New Zealand" "USA"
## [57] "USA" "USA"
## [59] "USA" "USA"
## [61] "USA" "USA"
## [63] "USA" "USA"
## [65] "USA" "USA"
## [67] "Uruguay" "Uruguay"
## [69] "Uruguay" "Uruguay"
## [71] "Uruguay" "Uruguay"
## [73] "Uruguay" "Uruguay"
## [75] "Uruguay" "Uruguay"
## [77] "Uruguay" "Luxembourg"
## [79] "Luxembourg" "Luxembourg"
## [81] "Luxembourg" "Luxembourg"
## [83] "Luxembourg" "Luxembourg"
## [85] "Luxembourg" "Luxembourg"
## [87] "Luxembourg" "Luxembourg"
## [89] "Brazil" "Brazil"
## [91] "Brazil" "Brazil"
## [93] "Brazil" "Brazil"
## [95] "Brazil" "Brazil"
## [97] "Brazil" "Brazil"
## [99] "Brazil" "Kazakhstan"
## [101] "Kazakhstan" "Kazakhstan"
## [103] "Kazakhstan" "Kazakhstan"
## [105] "Kazakhstan" "Kazakhstan"
## [107] "Kazakhstan" "Kazakhstan"
## [109] "Kazakhstan" "Kazakhstan"
## [111] "Sweden" "Sweden"
## [113] "Sweden" "Sweden"
## [115] "Sweden" "Sweden"
## [117] "Sweden" "Sweden"
## [119] "Sweden" "Sweden"
## [121] "Sweden" "Bermuda"
## [123] "Bermuda" "Bermuda"
## [125] "Bermuda" "Bermuda"
## [127] "Bermuda" "Bermuda"
## [129] "Bermuda" "Bermuda"
## [131] "Bermuda" "Bermuda"
## [133] "Denmark" "Denmark"
## [135] "Denmark" "Denmark"
## [137] "Denmark" "Denmark"
## [139] "Denmark" "Denmark"
## [141] "Denmark" "Denmark"
## [143] "Denmark" "Finland"
## [145] "Finland" "Finland"
## [147] "Finland" "Finland"
## [149] "Finland" "Finland"
## [151] "Finland" "Finland"
## [153] "Finland" "Finland"
## [155] "Ireland" "Ireland"
## [157] "Ireland" "Ireland"
## [159] "Ireland" "Ireland"
## [161] "Ireland" "Ireland"
## [163] "Ireland" "Ireland"
## [165] "Ireland" "Greece"
## [167] "Greece" "Greece"
## [169] "Greece" "Greece"
## [171] "Greece" "Greece"
## [173] "Greece" "Greece"
## [175] "Greece" "Greece"
## [177] "France" "France"
## [179] "France" "France"
## [181] "France" "France"
## [183] "France" "France"
## [185] "France" "France"
## [187] "France" "Canada"
## [189] "Canada" "Canada"
## [191] "Canada" "Canada"
## [193] "Canada" "Canada"
## [195] "Canada" "Canada"
## [197] "Canada" "Canada"
## [199] "Norway" "Norway"
## [201] "Norway" "Norway"
## [203] "Norway" "Norway"
## [205] "Norway" "Norway"
## [207] "Norway" "Norway"
## [209] "Norway" "Hong Kong SAR. China"
## [211] "Hong Kong SAR. China" "Hong Kong SAR. China"
## [213] "Hong Kong SAR. China" "Hong Kong SAR. China"
## [215] "Hong Kong SAR. China" "Hong Kong SAR. China"
## [217] "Hong Kong SAR. China" "Hong Kong SAR. China"
## [219] "Hong Kong SAR. China" "Hong Kong SAR. China"
## [221] "French Polynesia" "French Polynesia"
## [223] "French Polynesia" "French Polynesia"
## [225] "French Polynesia" "French Polynesia"
## [227] "French Polynesia" "French Polynesia"
## [229] "French Polynesia" "French Polynesia"
## [231] "French Polynesia" "Israel"
## [233] "Israel" "Israel"
## [235] "Israel" "Israel"
## [237] "Israel" "Israel"
## [239] "Israel" "Israel"
## [241] "Israel" "Israel"
## [243] "Switzerland" "Switzerland"
## [245] "Switzerland" "Switzerland"
## [247] "Switzerland" "Switzerland"
## [249] "Switzerland" "Switzerland"
## [251] "Switzerland" "Switzerland"
## [253] "Switzerland" "Netherlands"
## [255] "Netherlands" "Netherlands"
## [257] "Netherlands" "Netherlands"
## [259] "Netherlands" "Netherlands"
## [261] "Netherlands" "Netherlands"
## [263] "Netherlands" "Netherlands"
## [265] "Kuwait" "Kuwait"
## [267] "Kuwait" "Kuwait"
## [269] "Kuwait" "Kuwait"
## [271] "Kuwait" "Kuwait"
## [273] "Kuwait" "Kuwait"
## [275] "Kuwait" "United Kingdom"
## [277] "United Kingdom" "United Kingdom"
## [279] "United Kingdom" "United Kingdom"
## [281] "United Kingdom" "United Kingdom"
## [283] "United Kingdom" "United Kingdom"
## [285] "United Kingdom" "United Kingdom"
## [287] "Austria" "Austria"
## [289] "Austria" "Austria"
## [291] "Austria" "Austria"
## [293] "Austria" "Austria"
## [295] "Austria" "Austria"
## [297] "Austria" "Oman"
## [299] "Oman" "Oman"
## [301] "Oman" "Oman"
## [303] "Oman" "Oman"
## [305] "Oman" "Oman"
## [307] "Oman" "Oman"
## [309] "Italy" "Italy"
## [311] "Italy" "Italy"
## [313] "Italy" "Italy"
## [315] "Italy" "Italy"
## [317] "Italy" "Italy"
## [319] "Italy" "Bahamas"
## [321] "Bahamas" "Bahamas"
## [323] "Bahamas" "Bahamas"
## [325] "Bahamas" "Bahamas"
## [327] "Bahamas" "Bahamas"
## [329] "Bahamas" "Bahamas"
## [331] "Portugal" "Portugal"
## [333] "Portugal" "Portugal"
## [335] "Portugal" "Portugal"
## [337] "Portugal" "Portugal"
## [339] "Portugal" "Portugal"
## [341] "Portugal" "Malta"
## [343] "Malta" "Malta"
## [345] "Malta" "Malta"
## [347] "Malta" "Malta"
## [349] "Malta" "Malta"
## [351] "Malta" "Malta"
## [353] "Armenia" "Armenia"
## [355] "Armenia" "Armenia"
## [357] "Armenia" "Armenia"
## [359] "Armenia" "Armenia"
## [361] "Armenia" "Armenia"
## [363] "Armenia" "Slovenia"
## [365] "Slovenia" "Slovenia"
## [367] "Slovenia" "Slovenia"
## [369] "Slovenia" "Slovenia"
## [371] "Slovenia" "Slovenia"
## [373] "Slovenia" "Slovenia"
## [375] "Chile" "Chile"
## [377] "Chile" "Chile"
## [379] "Chile" "Chile"
## [381] "Chile" "Chile"
## [383] "Chile" "Chile"
## [385] "Chile" "Venezuela"
## [387] "Venezuela" "Venezuela"
## [389] "Venezuela" "Venezuela"
## [391] "Venezuela" "Venezuela"
## [393] "Venezuela" "Venezuela"
## [395] "Venezuela" "Venezuela"
## [397] "Belgium" "Belgium"
## [399] "Belgium" "Belgium"
## [401] "Belgium" "Belgium"
## [403] "Belgium" "Belgium"
## [405] "Belgium" "Belgium"
## [407] "Belgium" "Germany"
## [409] "Germany" "Germany"
## [411] "Germany" "Germany"
## [413] "Germany" "Germany"
## [415] "Germany" "Germany"
## [417] "Germany" "Germany"
## [419] "Russia" "Russia"
## [421] "Russia" "Russia"
## [423] "Russia" "Russia"
## [425] "Russia" "Russia"
## [427] "Russia" "Russia"
## [429] "Russia" "Croatia"
## [431] "Croatia" "Croatia"
## [433] "Croatia" "Croatia"
## [435] "Croatia" "Croatia"
## [437] "Croatia" "Croatia"
## [439] "Croatia" "Croatia"
## [441] "Belarus" "Belarus"
## [443] "Belarus" "Belarus"
## [445] "Belarus" "Belarus"
## [447] "Belarus" "Belarus"
## [449] "Belarus" "Belarus"
## [451] "Belarus" "Spain"
## [453] "Spain" "Spain"
## [455] "Spain" "Spain"
## [457] "Spain" "Spain"
## [459] "Spain" "Spain"
## [461] "Spain" "Spain"
## [463] "Paraguay" "Paraguay"
## [465] "Paraguay" "Paraguay"
## [467] "Paraguay" "Paraguay"
## [469] "Paraguay" "Paraguay"
## [471] "Paraguay" "Paraguay"
## [473] "Paraguay" "New Caledonia"
## [475] "New Caledonia" "New Caledonia"
## [477] "New Caledonia" "New Caledonia"
## [479] "New Caledonia" "New Caledonia"
## [481] "New Caledonia" "New Caledonia"
## [483] "New Caledonia" "New Caledonia"
## [485] "South Africa" "South Africa"
## [487] "South Africa" "South Africa"
## [489] "South Africa" "South Africa"
## [491] "South Africa" "South Africa"
## [493] "South Africa" "South Africa"
## [495] "South Africa" "Barbados"
## [497] "Barbados" "Barbados"
## [499] "Barbados" "Barbados"
## [501] "Barbados" "Barbados"
## [503] "Barbados" "Barbados"
## [505] "Barbados" "Barbados"
## [507] "Lithuania" "Lithuania"
## [509] "Lithuania" "Lithuania"
## [511] "Lithuania" "Lithuania"
## [513] "Lithuania" "Lithuania"
## [515] "Lithuania" "Lithuania"
## [517] "Lithuania" "Turkey"
## [519] "Turkey" "Turkey"
## [521] "Turkey" "Turkey"
## [523] "Turkey" "Turkey"
## [525] "Turkey" "Turkey"
## [527] "Turkey" "Turkey"
## [529] "Estonia" "Estonia"
## [531] "Estonia" "Estonia"
## [533] "Estonia" "Estonia"
## [535] "Estonia" "Estonia"
## [537] "Estonia" "Estonia"
## [539] "Estonia" "Mexico"
## [541] "Mexico" "Mexico"
## [543] "Mexico" "Mexico"
## [545] "Mexico" "Mexico"
## [547] "Mexico" "Mexico"
## [549] "Mexico" "Mexico"
## [551] "Costa Rica" "Costa Rica"
## [553] "Costa Rica" "Costa Rica"
## [555] "Costa Rica" "Costa Rica"
## [557] "Costa Rica" "Costa Rica"
## [559] "Costa Rica" "Costa Rica"
## [561] "Costa Rica" "Bolivia"
## [563] "Bolivia" "Bolivia"
## [565] "Bolivia" "Bolivia"
## [567] "Bolivia" "Bolivia"
## [569] "Bolivia" "Bolivia"
## [571] "Bolivia" "Bolivia"
## [573] "Ecuador" "Ecuador"
## [575] "Ecuador" "Ecuador"
## [577] "Ecuador" "Ecuador"
## [579] "Ecuador" "Ecuador"
## [581] "Ecuador" "Ecuador"
## [583] "Ecuador" "Panama"
## [585] "Panama" "Panama"
## [587] "Panama" "Panama"
## [589] "Panama" "Panama"
## [591] "Panama" "Panama"
## [593] "Panama" "Panama"
## [595] "Czech Republic" "Czech Republic"
## [597] "Czech Republic" "Czech Republic"
## [599] "Czech Republic" "Czech Republic"
## [601] "Czech Republic" "Czech Republic"
## [603] "Czech Republic" "Czech Republic"
## [605] "Czech Republic" "Romania"
## [607] "Romania" "Romania"
## [609] "Romania" "Romania"
## [611] "Romania" "Romania"
## [613] "Romania" "Romania"
## [615] "Romania" "Romania"
## [617] "Colombia" "Colombia"
## [619] "Colombia" "Colombia"
## [621] "Colombia" "Colombia"
## [623] "Colombia" "Colombia"
## [625] "Colombia" "Colombia"
## [627] "Colombia" "Maldives"
## [629] "Maldives" "Maldives"
## [631] "Maldives" "Maldives"
## [633] "Maldives" "Maldives"
## [635] "Maldives" "Maldives"
## [637] "Maldives" "Maldives"
## [639] "Cyprus" "Cyprus"
## [641] "Cyprus" "Cyprus"
## [643] "Cyprus" "Cyprus"
## [645] "Cyprus" "Cyprus"
## [647] "Cyprus" "Cyprus"
## [649] "Cyprus" "Serbia"
## [651] "Serbia" "Serbia"
## [653] "Serbia" "Serbia"
## [655] "Serbia" "Serbia"
## [657] "Serbia" "Serbia"
## [659] "Serbia" "Serbia"
## [661] "United Arab Emirates" "United Arab Emirates"
## [663] "United Arab Emirates" "United Arab Emirates"
## [665] "United Arab Emirates" "United Arab Emirates"
## [667] "United Arab Emirates" "United Arab Emirates"
## [669] "United Arab Emirates" "United Arab Emirates"
## [671] "United Arab Emirates" "Algeria"
## [673] "Algeria" "Algeria"
## [675] "Algeria" "Algeria"
## [677] "Algeria" "Algeria"
## [679] "Algeria" "Algeria"
## [681] "Algeria" "Algeria"
## [683] "Ukraine" "Ukraine"
## [685] "Ukraine" "Ukraine"
## [687] "Ukraine" "Ukraine"
## [689] "Ukraine" "Ukraine"
## [691] "Ukraine" "Ukraine"
## [693] "Ukraine" "Pakistan"
## [695] "Pakistan" "Pakistan"
## [697] "Pakistan" "Pakistan"
## [699] "Pakistan" "Pakistan"
## [701] "Pakistan" "Pakistan"
## [703] "Pakistan" "Pakistan"
## [705] "Swaziland" "Swaziland"
## [707] "Swaziland" "Swaziland"
## [709] "Swaziland" "Swaziland"
## [711] "Swaziland" "Swaziland"
## [713] "Swaziland" "Swaziland"
## [715] "Swaziland" "Latvia"
## [717] "Latvia" "Latvia"
## [719] "Latvia" "Latvia"
## [721] "Latvia" "Latvia"
## [723] "Latvia" "Latvia"
## [725] "Latvia" "Latvia"
## [727] "Bosnia and Herzegovina" "Bosnia and Herzegovina"
## [729] "Bosnia and Herzegovina" "Bosnia and Herzegovina"
## [731] "Bosnia and Herzegovina" "Bosnia and Herzegovina"
## [733] "Bosnia and Herzegovina" "Bosnia and Herzegovina"
## [735] "Bosnia and Herzegovina" "Bosnia and Herzegovina"
## [737] "Bosnia and Herzegovina" "Fiji"
## [739] "Fiji" "Fiji"
## [741] "Fiji" "Fiji"
## [743] "Fiji" "Fiji"
## [745] "Fiji" "Fiji"
## [747] "Fiji" "Fiji"
## [749] "South Korea" "South Korea"
## [751] "South Korea" "South Korea"
## [753] "South Korea" "South Korea"
## [755] "South Korea" "South Korea"
## [757] "South Korea" "South Korea"
## [759] "South Korea" "Poland"
## [761] "Poland" "Poland"
## [763] "Poland" "Poland"
## [765] "Poland" "Poland"
## [767] "Poland" "Poland"
## [769] "Poland" "Poland"
## [771] "Saudi Arabia" "Saudi Arabia"
## [773] "Saudi Arabia" "Saudi Arabia"
## [775] "Saudi Arabia" "Saudi Arabia"
## [777] "Saudi Arabia" "Saudi Arabia"
## [779] "Saudi Arabia" "Saudi Arabia"
## [781] "Saudi Arabia" "Botswana"
## [783] "Botswana" "Botswana"
## [785] "Botswana" "Botswana"
## [787] "Botswana" "Botswana"
## [789] "Botswana" "Botswana"
## [791] "Botswana" "Botswana"
## [793] "Macedonia" "Macedonia"
## [795] "Macedonia" "Macedonia"
## [797] "Macedonia" "Macedonia"
## [799] "Macedonia" "Macedonia"
## [801] "Macedonia" "Macedonia"
## [803] "Macedonia" "Hungary"
## [805] "Hungary" "Hungary"
## [807] "Hungary" "Hungary"
## [809] "Hungary" "Hungary"
## [811] "Hungary" "Hungary"
## [813] "Hungary" "Hungary"
## [815] "Trinidad and Tobago" "Trinidad and Tobago"
## [817] "Trinidad and Tobago" "Trinidad and Tobago"
## [819] "Trinidad and Tobago" "Trinidad and Tobago"
## [821] "Trinidad and Tobago" "Trinidad and Tobago"
## [823] "Trinidad and Tobago" "Trinidad and Tobago"
## [825] "Trinidad and Tobago" "Tunisia"
## [827] "Tunisia" "Tunisia"
## [829] "Tunisia" "Tunisia"
## [831] "Tunisia" "Tunisia"
## [833] "Tunisia" "Tunisia"
## [835] "Tunisia" "Tunisia"
## [837] "Egypt" "Egypt"
## [839] "Egypt" "Egypt"
## [841] "Egypt" "Egypt"
## [843] "Egypt" "Egypt"
## [845] "Egypt" "Egypt"
## [847] "Egypt" "Mauritius"
## [849] "Mauritius" "Mauritius"
## [851] "Mauritius" "Mauritius"
## [853] "Mauritius" "Mauritius"
## [855] "Mauritius" "Mauritius"
## [857] "Mauritius" "Mauritius"
## [859] "Bulgaria" "Bulgaria"
## [861] "Bulgaria" "Bulgaria"
## [863] "Bulgaria" "Bulgaria"
## [865] "Bulgaria" "Bulgaria"
## [867] "Bulgaria" "Bulgaria"
## [869] "Bulgaria" "Morocco"
## [871] "Morocco" "Morocco"
## [873] "Morocco" "Morocco"
## [875] "Morocco" "Morocco"
## [877] "Morocco" "Morocco"
## [879] "Morocco" "Morocco"
## [881] "Slovakia" "Slovakia"
## [883] "Slovakia" "Slovakia"
## [885] "Slovakia" "Slovakia"
## [887] "Slovakia" "Slovakia"
## [889] "Slovakia" "Slovakia"
## [891] "Slovakia" "Niger"
## [893] "Niger" "Niger"
## [895] "Niger" "Niger"
## [897] "Niger" "Niger"
## [899] "Niger" "Niger"
## [901] "Niger" "Niger"
## [903] "Kenya" "Kenya"
## [905] "Kenya" "Kenya"
## [907] "Kenya" "Kenya"
## [909] "Kenya" "Kenya"
## [911] "Kenya" "Kenya"
## [913] "Kenya" "Jordan"
## [915] "Jordan" "Jordan"
## [917] "Jordan" "Jordan"
## [919] "Jordan" "Jordan"
## [921] "Jordan" "Jordan"
## [923] "Jordan" "Jordan"
## [925] "Japan" "Japan"
## [927] "Japan" "Japan"
## [929] "Japan" "Japan"
## [931] "Japan" "Japan"
## [933] "Japan" "Japan"
## [935] "Japan" "Georgia"
## [937] "Georgia" "Georgia"
## [939] "Georgia" "Georgia"
## [941] "Georgia" "Georgia"
## [943] "Georgia" "Georgia"
## [945] "Georgia" "Georgia"
## [947] "Grenada" "Grenada"
## [949] "Grenada" "Grenada"
## [951] "Grenada" "Grenada"
## [953] "Grenada" "Grenada"
## [955] "Grenada" "Grenada"
## [957] "Grenada" "El Salvador"
## [959] "El Salvador" "El Salvador"
## [961] "El Salvador" "El Salvador"
## [963] "El Salvador" "El Salvador"
## [965] "El Salvador" "El Salvador"
## [967] "El Salvador" "El Salvador"
## [969] "Cuba" "Cuba"
## [971] "Cuba" "Cuba"
## [973] "Cuba" "Cuba"
## [975] "Cuba" "Cuba"
## [977] "Cuba" "Cuba"
## [979] "Cuba" "China"
## [981] "China" "China"
## [983] "China" "China"
## [985] "China" "China"
## [987] "China" "China"
## [989] "China" "China"
## [991] "Honduras" "Honduras"
## [993] "Honduras" "Honduras"
## [995] "Honduras" "Honduras"
## [997] "Honduras" "Honduras"
## [999] "Honduras" "Honduras"
## [1001] "Honduras" "Taiwan. ROC"
## [1003] "Taiwan. ROC" "Taiwan. ROC"
## [1005] "Taiwan. ROC" "Taiwan. ROC"
## [1007] "Taiwan. ROC" "Taiwan. ROC"
## [1009] "Taiwan. ROC" "Taiwan. ROC"
## [1011] "Taiwan. ROC" "Taiwan. ROC"
## [1013] "Angola" "Angola"
## [1015] "Angola" "Angola"
## [1017] "Angola" "Angola"
## [1019] "Angola" "Angola"
## [1021] "Angola" "Angola"
## [1023] "Angola" "Jamaica"
## [1025] "Jamaica" "Jamaica"
## [1027] "Jamaica" "Jamaica"
## [1029] "Jamaica" "Jamaica"
## [1031] "Jamaica" "Jamaica"
## [1033] "Jamaica" "Jamaica"
## [1035] "Namibia" "Namibia"
## [1037] "Namibia" "Namibia"
## [1039] "Namibia" "Namibia"
## [1041] "Namibia" "Namibia"
## [1043] "Namibia" "Namibia"
## [1045] "Namibia" "Belize"
## [1047] "Belize" "Belize"
## [1049] "Belize" "Belize"
## [1051] "Belize" "Belize"
## [1053] "Belize" "Belize"
## [1055] "Belize" "Belize"
## [1057] "Malaysia" "Malaysia"
## [1059] "Malaysia" "Malaysia"
## [1061] "Malaysia" "Malaysia"
## [1063] "Malaysia" "Malaysia"
## [1065] "Malaysia" "Malaysia"
## [1067] "Malaysia" "Zimbabwe"
## [1069] "Zimbabwe" "Zimbabwe"
## [1071] "Zimbabwe" "Zimbabwe"
## [1073] "Zimbabwe" "Zimbabwe"
## [1075] "Zimbabwe" "Zimbabwe"
## [1077] "Zimbabwe" "Zimbabwe"
## [1079] "Guatemala" "Guatemala"
## [1081] "Guatemala" "Guatemala"
## [1083] "Guatemala" "Guatemala"
## [1085] "Guatemala" "Guatemala"
## [1087] "Guatemala" "Guatemala"
## [1089] "Guatemala" "Uganda"
## [1091] "Uganda" "Uganda"
## [1093] "Uganda" "Uganda"
## [1095] "Uganda" "Uganda"
## [1097] "Uganda" "Uganda"
## [1099] "Uganda" "Uganda"
## [1101] "Nepal" "Nepal"
## [1103] "Nepal" "Nepal"
## [1105] "Nepal" "Nepal"
## [1107] "Nepal" "Nepal"
## [1109] "Nepal" "Nepal"
## [1111] "Nepal" "Iran"
## [1113] "Iran" "Iran"
## [1115] "Iran" "Iran"
## [1117] "Iran" "Iran"
## [1119] "Iran" "Iran"
## [1121] "Iran" "Iran"
## [1123] "Tanzania" "Tanzania"
## [1125] "Tanzania" "Tanzania"
## [1127] "Tanzania" "Tanzania"
## [1129] "Tanzania" "Tanzania"
## [1131] "Tanzania" "Tanzania"
## [1133] "Tanzania" "Senegal"
## [1135] "Senegal" "Senegal"
## [1137] "Senegal" "Senegal"
## [1139] "Senegal" "Senegal"
## [1141] "Senegal" "Senegal"
## [1143] "Senegal" "Senegal"
## [1145] "Peru" "Peru"
## [1147] "Peru" "Peru"
## [1149] "Peru" "Peru"
## [1151] "Peru" "Peru"
## [1153] "Peru" "Peru"
## [1155] "Peru" "Nicaragua"
## [1157] "Nicaragua" "Nicaragua"
## [1159] "Nicaragua" "Nicaragua"
## [1161] "Nicaragua" "Nicaragua"
## [1163] "Nicaragua" "Nicaragua"
## [1165] "Nicaragua" "Nicaragua"
## [1167] "Vietnam" "Vietnam"
## [1169] "Vietnam" "Vietnam"
## [1171] "Vietnam" "Vietnam"
## [1173] "Vietnam" "Vietnam"
## [1175] "Vietnam" "Vietnam"
## [1177] "Vietnam" "Ethiopia"
## [1179] "Ethiopia" "Ethiopia"
## [1181] "Ethiopia" "Ethiopia"
## [1183] "Ethiopia" "Ethiopia"
## [1185] "Ethiopia" "Ethiopia"
## [1187] "Ethiopia" "Ethiopia"
## [1189] "Myanmar" "Myanmar"
## [1191] "Myanmar" "Myanmar"
## [1193] "Myanmar" "Myanmar"
## [1195] "Myanmar" "Myanmar"
## [1197] "Myanmar" "Myanmar"
## [1199] "Myanmar" "Congo"
## [1201] "Congo" "Congo"
## [1203] "Congo" "Congo"
## [1205] "Congo" "Congo"
## [1207] "Congo" "Congo"
## [1209] "Congo" "Congo"
## [1211] "Zambia" "Zambia"
## [1213] "Zambia" "Zambia"
## [1215] "Zambia" "Zambia"
## [1217] "Zambia" "Zambia"
## [1219] "Zambia" "Zambia"
## [1221] "Zambia" "Cameroon"
## [1223] "Cameroon" "Cameroon"
## [1225] "Cameroon" "Cameroon"
## [1227] "Cameroon" "Cameroon"
## [1229] "Cameroon" "Cameroon"
## [1231] "Cameroon" "Cameroon"
## [1233] "Madagascar" "Madagascar"
## [1235] "Madagascar" "Madagascar"
## [1237] "Madagascar" "Madagascar"
## [1239] "Madagascar" "Madagascar"
## [1241] "Madagascar" "Madagascar"
## [1243] "Madagascar" "Malawi"
## [1245] "Malawi" "Malawi"
## [1247] "Malawi" "Malawi"
## [1249] "Malawi" "Malawi"
## [1251] "Malawi" "Malawi"
## [1253] "Malawi" "Malawi"
## [1255] "Guinea" "Guinea"
## [1257] "Guinea" "Guinea"
## [1259] "Guinea" "Guinea"
## [1261] "Guinea" "Guinea"
## [1263] "Guinea" "Guinea"
## [1265] "Guinea" "Nigeria"
## [1267] "Nigeria" "Nigeria"
## [1269] "Nigeria" "Nigeria"
## [1271] "Nigeria" "Nigeria"
## [1273] "Nigeria" "Nigeria"
## [1275] "Nigeria" "Nigeria"
## [1277] "Rwanda" "Rwanda"
## [1279] "Rwanda" "Rwanda"
## [1281] "Rwanda" "Rwanda"
## [1283] "Rwanda" "Rwanda"
## [1285] "Rwanda" "Rwanda"
## [1287] "Rwanda" "Philippines"
## [1289] "Philippines" "Philippines"
## [1291] "Philippines" "Philippines"
## [1293] "Philippines" "Philippines"
## [1295] "Philippines" "Philippines"
## [1297] "Philippines" "Philippines"
## [1299] "Ghana" "Ghana"
## [1301] "Ghana" "Ghana"
## [1303] "Ghana" "Ghana"
## [1305] "Ghana" "Ghana"
## [1307] "Ghana" "Ghana"
## [1309] "Ghana" "Togo"
## [1311] "Togo" "Togo"
## [1313] "Togo" "Togo"
## [1315] "Togo" "Togo"
## [1317] "Togo" "Togo"
## [1319] "Togo" "Togo"
## [1321] "Gambia" "Gambia"
## [1323] "Gambia" "Gambia"
## [1325] "Gambia" "Gambia"
## [1327] "Gambia" "Gambia"
## [1329] "Gambia" "Gambia"
## [1331] "Gambia" "India"
## [1333] "India" "India"
## [1335] "India" "India"
## [1337] "India" "India"
## [1339] "India" "India"
## [1341] "India" "India"
## [1343] "Thailand" "Thailand"
## [1345] "Thailand" "Thailand"
## [1347] "Thailand" "Thailand"
## [1349] "Thailand" "Thailand"
## [1351] "Thailand" "Thailand"
## [1353] "Thailand" "Mozambique"
## [1355] "Mozambique" "Mozambique"
## [1357] "Mozambique" "Mozambique"
## [1359] "Mozambique" "Mozambique"
## [1361] "Mozambique" "Mozambique"
## [1363] "Mozambique" "Mozambique"
## [1365] "Cambodia" "Cambodia"
## [1367] "Cambodia" "Cambodia"
## [1369] "Cambodia" "Cambodia"
## [1371] "Cambodia" "Cambodia"
## [1373] "Cambodia" "Cambodia"
## [1375] "Cambodia" "Sierra Leone"
## [1377] "Sierra Leone" "Sierra Leone"
## [1379] "Sierra Leone" "Sierra Leone"
## [1381] "Sierra Leone" "Sierra Leone"
## [1383] "Sierra Leone" "Sierra Leone"
## [1385] "Sierra Leone" "Sierra Leone"
## [1387] "Sri Lanka" "Sri Lanka"
## [1389] "Sri Lanka" "Sri Lanka"
## [1391] "Sri Lanka" "Sri Lanka"
## [1393] "Sri Lanka" "Sri Lanka"
## [1395] "Sri Lanka" "Sri Lanka"
## [1397] "Sri Lanka" "Indonesia"
## [1399] "Indonesia" "Indonesia"
## [1401] "Indonesia" "Indonesia"
## [1403] "Indonesia" "Indonesia"
## [1405] "Indonesia" "Indonesia"
## [1407] "Indonesia" "Indonesia"
## [1409] "Liberia" "Liberia"
## [1411] "Liberia" "Liberia"
## [1413] "Liberia" "Liberia"
## [1415] "Liberia" "Liberia"
## [1417] "Liberia" "Liberia"
## [1419] "Liberia" "Bangladesh"
## [1421] "Bangladesh" "Bangladesh"
## [1423] "Bangladesh" "Bangladesh"
## [1425] "Bangladesh" "Bangladesh"
## [1427] "Bangladesh" "Bangladesh"
## [1429] "Bangladesh" "Bangladesh"
str_detect(data$country, "Russia")
## [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 FALSE FALSE FALSE FALSE FALSE 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 TRUE TRUE
## [421] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE 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 FALSE 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 FALSE 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 FALSE
## [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 FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1309] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1321] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1333] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1345] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1357] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1369] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1381] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1393] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1405] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1417] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
## [1429] FALSE FALSE
sum(str_detect(data$country, "Russia"))
## [1] 11
data %>%
summarise(num_Russia = sum(str_detect(country, "Russia")))
## # A tibble: 1 × 1
## num_Russia
## <int>
## 1 11
data %>%
mutate(col_Russia = str_extract(country, "Russia")) %>%
select(country, col_Russia) %>%
filter(!is.na(col_Russia))
## # A tibble: 11 × 2
## country col_Russia
## <chr> <chr>
## 1 Russia Russia
## 2 Russia Russia
## 3 Russia Russia
## 4 Russia Russia
## 5 Russia Russia
## 6 Russia Russia
## 7 Russia Russia
## 8 Russia Russia
## 9 Russia Russia
## 10 Russia Russia
## 11 Russia Russia
data %>%
mutate(col_Japan = str_replace(country, "Argentina", "Japan")) %>%
select(country, col_Japan)
## # A tibble: 1,430 × 2
## country col_Japan
## <chr> <chr>
## 1 Argentina Japan
## 2 Argentina Japan
## 3 Argentina Japan
## 4 Argentina Japan
## 5 Argentina Japan
## 6 Argentina Japan
## 7 Argentina Japan
## 8 Argentina Japan
## 9 Argentina Japan
## 10 Argentina Japan
## # ℹ 1,420 more rows