ggplot2 example - deaths from known diseases in Manipur

require(ggplot2)
require(dplyr)

cases <- data.frame("Diseases" = c("Diarrhoeal", "TB", 
          "Respiratory", "Malaria", "Fever", "HIV",
          "Heart", "Neuro", "Accidents",
          "Suicide", "AnimalBites", "AcuteDisease", "ChronicDisease"), "Cases" = c(5, 24, 50, 7, 31, 22, 237, 59, 106, 40, 2, 94, 493))
cases

##          Diseases Cases
## 1      Diarrhoeal     5
## 2              TB    24
## 3     Respiratory    50
## 4         Malaria     7
## 5           Fever    31
## 6             HIV    22
## 7           Heart   237
## 8           Neuro    59
## 9       Accidents   106
## 10        Suicide    40
## 11    AnimalBites     2
## 12   AcuteDisease    94
## 13 ChronicDisease   493

ggplot(cases, aes(x = reorder(Diseases, -Cases), Cases)) +
  geom_bar(stat = "identity") +
  guides(fill= FALSE) +
  theme_bw() +
  ggtitle("Known causes of deaths in Manipur(2012-2013)") +
  theme(plot.title = element_text(hjust = 0, size = rel(1),
                                  family = "Comic Sans")) +
  theme(axis.text = element_text(face = "bold", size = 12,
                                 family = "Comic Sans")) +
  labs(x = "") +
  theme(axis.title.x = element_text(face = "bold", size = 15,
                                    family = "Comic Sans")) +
  theme(axis.title.y = element_text(face = "bold", size = 15,
                                    family = "Comic Sans"))

Data Source