********************************************************************** * African States Since Independence * Assignment 2: Unfulfilled Dreams ********************************************************************** ************************************************************************ * Instructions ************************************************************************ /* Assess the progress of sub-Saharan African (SSA) countries between independence and 1992. Compare the experience of SSA countries to those countries participating in the solidarity conference in Bandung, Indonesia — a set of post-colonial states that also achieved independence after WWII. Prepare a four-slide presentation to characterize their progress in terms of economic development, political liberalism, and social order. Slide 1: Characterize the evolution of human development, using infant mortality as your indicator. Slide 2: Characterize the evolution of political liberalism, using the Polity score as your indicator. Slide 3: Characterize the evolution of social order, using coups as your indicator. Slide 4: Interpret your results as the degree to which the dreams of Africa’s early independent leaders were fulfilled in the first generation of independence, how Africa compares to the countries from the Bandung set, and how your country compares to the average country in sub-Saharan Africa. */ ************************************************************************ * Housekeeping ************************************************************************ * Input dataset import delimited "https://african-states-book.info/img/portfolio/problem-sets/data/02-data.csv", clear * Identify your country and store it in two variables, `cname' and `ccode' global cname "Kenya" // This macro stores the text that is used to label plots. global ccode "KEN" // This macro stores the text that is used to identify data; it must precisely match your country's ISO three-letter country code (iso3c). * Remove data after 1992 drop if year > 1992 ************************************************************************ * Human Development Graph -- run all the following commands together ************************************************************************ * Makes graph graph twoway /// (line inftmort year if iso3c=="SSA", lpattern(shortdash_dot)) /// (line inftmort year if iso3c=="BND", lpattern(dash)) /// (line inftmort year if iso3c=="$ccode", lpattern(solid)), /// ytitle("Maternal Mortality per 100,000 Live Births") xtitle("Year") /// xscale(r(1960 1992)) /// legend(lpattern(1) order(3 "$cname" 1 "Sub-Saharan Africa" 2 "Bandung")) * Save graph * Will save in working directory set above via cd . graph export 02_inftmort.png, width(500) replace ************************************************************************ * Political Liberalism -- run all the following commands together ************************************************************************ * Makes graph graph twoway /// (line polity year if iso3c=="SSA", lpattern(shortdash_dot)) /// (line polity year if iso3c=="BND", lpattern(dash)) /// (line polity year if iso3c=="$ccode", lpattern(solid)), /// ytitle("Polity Score") xtitle("Year") /// xscale(r(1960 1992)) /// legend(lpattern(1) order(3 "$cname" 1 "Sub-Saharan Africa" 2 "Bandung")) * Save graph * Will save in working directory set above via cd . graph export 02_polity.png, width(500) replace ************************************************************************ * Social Order -- run all the following commands together ************************************************************************ * Housekeeping drop if iso3c == "SSA" | iso3c == "BND" // Drop aggregated comparison group data replace coups = 1 if coups >= 1 // Make coups = 1 whenever one or more coups occur * Create a grouping variable called "country_set" gen country_set = "$cname" if iso3c == "$ccode" replace country_set = "Rest of SSA" if ssa == 1 & iso3c != "$ccode" replace country_set = "Bandung" if bndng == 1 * Compute the probability of a coup in a given year for each country using 'collapse' collapse (mean) p_coup = coups (firstnm) country_set, by(iso3c) * Prepare the data for final summary gen coup = 1 if p_coup > 0 // Create an indicator for the presence of any coups replace coup = 0 if missing(coup) gen n = 1 // Create a new variable to use for counting observations * Summarize the coup data by 'country_set' collapse (sum) ncountries = n (sum) ncoups = coup (mean) avgpcoup = p_coup, by(country_set) browse // View the complete data in Stata's data editor