Hello,
I'm trying do determine if some countries faced economic crisis in a given period by comparing the GDP value (mean_gdp) to the historical mean and standard deviation (histmeangdp) and (histsdgdp). I have tried to use ifelse() but it doesn't work, as I need to specify the country.
mydata$crisis_gdp <- ifelse(mydata$mean_gdp<(histmeangdp - histsdgdp), 1, 0)
You have a reproducible example below:
The main dataframe (where I want to insert a new column indicating if there was crisis or not)
data.frame(
stringsAsFactors = FALSE,
bill = c("Acuerdo contra el tráfico ilÃcito de migrantes entre los Estados Partes del Mercosur",
"Acuerdo contra el tráfico ilÃcito de migrantes entre los Estados Partes del Mercosur",
"Acuerdo contra el tráfico ilÃcito de migrantes entre los Estados Partes del Mercosur",
"Acuerdo contra el tráfico ilÃcito de migrantes entre los Estados Partes del Mercosur",
"Acuerdo contra el tráfico ilÃcito de migrantes entre los Estados Partes del Mercosur, la República de Bolivia y la República de Chile",
"Acuerdo contra el tráfico ilÃcito de migrantes entre los Estados Partes del Mercosur, la República de Bolivia y la República de Chile",
"Acuerdo contra el tráfico ilÃcito de migrantes entre los Estados Partes del Mercosur, la República de Bolivia y la República de Chile",
"Acuerdo contra el tráfico ilÃcito de migrantes entre los Estados Partes del Mercosur, la República de Bolivia y la República de Chile",
"Acuerdo de admisión de tÃtulos y grados universitarios para el ejercicio de actividades académicas en los Estados Parte del Mercosur",
"Acuerdo de admisión de tÃtulos y grados universitarios para el ejercicio de actividades académicas en los Estados Parte del Mercosur",
"Acuerdo de admisión de tÃtulos y grados universitarios para el ejercicio de actividades académicas en los Estados Parte del Mercosur",
"Acuerdo de admisión de tÃtulos y grados universitarios para el ejercicio de actividades académicas en los Estados Parte del Mercosur"),
cntry = c("Argentina","Brazil",
"Paraguay","Uruguay","Argentina","Brazil","Paraguay",
"Uruguay","Argentina","Brazil","Paraguay","Uruguay"),
mean_gdp = c(403612.265657552,
2186552.85062478,23721.7319773096,34647.2272436441,403612.265657552,
2131515.9358528,23721.7319773096,34647.2272436441,
291817.529327736,1561301.28167233,23083.9415915064,
44880.0711416869)
)
The dataframe with the GDP values, divided by year and country
data.frame(
stringsAsFactors = FALSE,
year = c("1990","1991","1992","1993",
"1994","1995","1996","1997","1998","1999","2000",
"2001","2002","2003","2004","2005","2006","2007",
"2008","2009","2010","2011","2012","2013","2014",
"2015","2016","2017","2018"),
Argentina = c(204022.709576019,
225605.750803947,247277.638553345,261428.668260367,276686.170019566,
268813.868517326,283670.377245591,306679.014181442,
318486.704781525,307704.474172928,305276.689188273,
291817.529327736,260025.512893345,283004.073515091,
308558.133837269,335870.650498235,362898.670600149,
395587.315892942,411637.215422162,387274.363587343,
426487.434874632,452093.534425313,447453.153875727,458215.851022343,
446702.64932211,458902.812680434,449356.129667934,
462021.24554028,450168.774848251),
Brazil = c(1190328.7904512,
1202589.17699285,1196095.19543709,1254943.07905259,1328357.24917717,
1384413.92509244,1414185.73384553,1462195.16145589,
1467138.81261922,1474004.10627881,1538682.66125963,
1560068.7562445,1607704.86065684,1626046.02392186,
1719705.69987883,1774772.93573377,1845089.2393129,
1957083.76872605,2056781.44097077,2054193.76311241,2208838.10859319,
2296626.68016874,2340748.92041541,2411084.2746306,
2423235.07223542,2337312.89010631,2260744.4619857,
2290651.15086124,2320824.15750549),
Paraguay = c(15072.4009298585,
15444.4660701346,15706.4703187341,16481.7981450403,17358.286599311,
18542.6095659408,18834.4303983244,19633.4841408321,
19646.8423228185,19378.4507957219,18930.0062043638,
18772.11959474,18768.1015361058,19579.0234359506,
20373.4263282599,20808.0914770334,21808.3608199,22990.7278981641,
24452.736056455,24389.6549826671,27107.573694974,
28259.404602775,28107.2240515083,30473.148310721,
31954.4146425446,32938.7301255886,34359.3462542358,
36061.4300076708,37271.7135902413),
Uruguay = c(22100.9277328455,
22883.0372408505,24698.0255693715,25354.3869873348,27200.5267832485,
26806.7722354053,28302.0426702529,29730.6489648803,
31074.1443152037,30471.5507314667,29883.4709399851,
28734.7114813469,26512.9415151065,26726.4459698004,
28063.8801838554,30157.4827229858,31393.5104782487,
33447.120372214,35847.3341150742,37368.513657464,
40284.5318602359,42364.0729820816,43862.9895982757,45897.1526850981,
47383.6656404033,47559.3364376997,48362.9932304934,
49616.242186666,50420.0668036221)
)
I appreciate your help in advance!