Types of Healthcare Facilities

The Indonesian government has embarked on rigorous efforts to expand its network of public health facilities shortly after its independence in 1948. These efforts were hastened during the mid-1980s and continued even during the Asian Economic Crisis in the late 1990’s.

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

CODES:

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

N <- as.matrix(cbind(facilities$hospital, facilities$puskemas, facilities$pharmacy))

x <- as.matrix(facilities$yr)

matplot(x, N, type = c("b"), col=c("darkblue","purple", "coral3"), names.arg=c(1969:2012), las=2, cex=1.5, xlab="Year",

main="Types of Healthcare Facilities", pch=3) #plot

legend("topleft", legend=c("Hospitals","Community Health Centers", "Pharmacies"), col=c("darkblue","purple", "coral3"), pch=3) # legend