Medical Professionals

There's an increase in the number of medical professionals over time. During the 1980s, the government initiated a program to locate midwives in villages.

Source: http://www.bps.go.id/eng/tab_sub/view.php?kat=1&tabel=1&daftar=1&id_subyek=30&notab=41

CODES:

staff <- read.csv(file = "staff.csv")

staff2 <- t(staff)

barplot(staff2, main="Number of medical professionals",

col=c("coral3","steelblue3"), beside=TRUE,

names.arg=c(1974:1999, 2003:2012), las=2,

legend=c("Doctors","Nurses/Midwives"), args.legend = list(x="left"))