* Example generated by -dataex-. To install: ssc install dataex
clear
input float(año pc pc_rural pc_urbe)
2007 42.43301 74.01557 30.14837
2008 37.3061 68.83646 25.375044
2009 33.497147 66.71891 21.29751
2010 30.77327 60.97694 20.008404
2011 27.82427 56.06097 18.010962
2012 25.81091 52.97845 16.647707
2013 23.911655 47.96577 16.069237
2014 22.727585 46.02896 15.331577
2015 21.771584 45.18442 14.540774
2016 20.742544 43.78548 13.86473
2017 21.70001 44.37628 15.13522
2018 20.488066 42.08461 14.422772
end

graph bar pc , over(año , label(labc("0 132 180"))) `opts' ///
ylab(, labc("0 132 180")) blabel(total, c("29 202 255") format(%9.1f) ) ///
ytitl("Porcentaje", c("0 132 180")) bar(1, c("0 172 237")) ///
tit("Perú: Pobreza monetaria 2007 - 2018", c("0 132 180") span pos(11)) ///
note("Fuente: ENAHO-INEI", c("192 222 237") span) ///
graphregion(color(white))


*Consulta: Para el siguiente gráfico ¿Como mantener la escala x: 2007 - 2018 y graficar solo una barra 2017?

graph bar pc if año==2007, over(año , label(labc("0 132 180"))) `opts' ///
ylab(, labc("0 132 180")) blabel(total, c("29 202 255") format(%9.1f) ) ///
ytitl("Porcentaje", c("0 132 180")) bar(1, c("0 172 237")) ///
tit("Perú: Pobreza monetaria 2007 - 2018", c("0 132 180") span pos(11)) ///
note("Fuente: ENAHO-INEI", c("192 222 237") span) ///
graphregion(color(white))