/* data from http://www.cnn.com/interactive/2016/06/politics/women-world-leaders/ The date each country elected or appointed its first female president or prime minister. It does not include acting or interim leaders. */ data FemaleLeaders; infile datalines delimiter=','; length Country $35 Name $35 Decade $5; input Year Country Name; rank = _N_; Decade = put( round(Year-5, 10), 4.) || "s"; datalines; 1960, Sri Lanka, Sirimavo Bandaranaike 1966, India, Indira Gandhi 1969, Israel, Golda Meir 1974, Argentina, Isabel Peron 1975, Central African Republic, Elisabeth Domitien 1979, Portugal, Maria de Lourdes Pintasilgo 1979, United Kingdom, Margaret Thatcher 1980, Dominica, Eugenia Charles 1980, Iceland, Vigdis Finnbogadottir 1981, Norway, Gro Harlem Brundtland 1982, Malta, Agatha Barbara 1986, Philippines, Corazon Aquino 1988, Pakistan, Benazir Bhutto 1990, Ireland, Mary Robinson 1990, Lithuania, Kazimira Danute Prunskiene 1990, Nicaragua, Violeta Barrios Torres de Chamorro 1991, Bangladesh, Khaleda Zia 1991, France, Edith Cresson 1992, Poland, Hanna Suchocka 1993, Burundi, Sylvie Kinigi 1993, Canada, Kim Campbell 1993, Rwanda, Agathe Uwilingiyimana 1993, Turkey, Tansu Ciller 1995, Haiti, Claudette Werleigh 1997, Guyana, Janet Rosenberg 1997, New Zealand, Jenny Shipley 1999, Latvia, Vaira Vike-Freiberga 1999, Panama, Mireya Elisa Moscoso Rodríguez 1999, Switzerland, Ruth Dreifuss 2001, Finland, Tarja Halonen 2001, Indonesia, Megawati Sukarnoputri 2001, Senegal, Mame Madior Boye 2002, Sao Tome and Principe, Maria das Neves 2003, Peru, Beatriz Merino 2004, Macedonia, Radmila Sekerinska 2004, Mozambique, Luisa Diogo 2005, Germany, Angela Merkel 2005, Ukraine, Yulia Tymoshenko 2006, Chile, Michelle Bachelet 2006, Jamaica, Portia Simpson-Miller 2006, Liberia, Ellen Johnson Sirleaf 2006, South Korea, Han Myung-sook 2008, Moldova, Zinaida Greceanii 2009, Croatia, Jadranka Kosor 2010, Australia, Julia Gillard 2010, Costa Rica, Laura Chinchilla 2010, Kyrgyzstan, Roza Otunbayeva 2010, Slovakia, Iveta Radicova 2010, Trinidad and Tobago, Kamla Persad-Bissessar 2011, Denmark, Helle Thorning-Schmidt 2011, Kosovo, Atifete Jahjaga 2011, Mali, Cisse Mariam Kaďdama Sidibe 2011, Thailand, Yingluck Shinawatra 2012, Malawi, Joyce Banda 2013, Slovenia, Alenka Bratusek 2013, Turkish Republic of Northern Cyprus, Sibel Siber 2014, Brazil, Dilma Rousseff 2015, Mauritius, Ameenah Firdaus Gurib-Fakim 2015, Namibia, Saara Kuugongelwa-Amadhila 2016, Taiwan, Tsai Ing-wen ; ods graphics / reset; /* first attempt: not very satisfying */ title "First Election of a Female Leader, by Year"; proc sgplot data=FemaleLeaders; vbar year; yaxis grid; xaxis type=linear; run; /* second attempt: okay, but prefer to label countries */ title "First Election of a Female Leader, by Decade"; proc sgplot data=FemaleLeaders; vbar Decade; yaxis grid; run; /* final attempt: scatter plot with tool tips */ ods graphics / height=600px width=500px imagemap=on; title "Female Elected World Leaders by Year"; proc sgplot data=FemaleLeaders; label rank = "Cumulative Total"; scatter x=year y=rank / datalabel=Country datalabelpos=right tip=(year country name); xaxis grid display=(nolabel) offsetmax=0.15; yaxis grid offsetmin=0; run;