Alif Ailan 2016 Data

setwd("C:/Users/hp/OneDrive - Higher Education Commission/Data Journalism")
alif<-read.csv("Alifailan.csv",header = TRUE)
library(tidyverse)
## -- Attaching packages ------------------------------------------- tidyverse 1.2.1 --
## v ggplot2 3.2.1     v purrr   0.3.2
## v tibble  2.1.3     v dplyr   0.8.3
## v tidyr   0.8.3     v stringr 1.4.0
## v readr   1.3.1     v forcats 0.4.0
## -- Conflicts ---------------------------------------------- tidyverse_conflicts() --
## x dplyr::filter() masks stats::filter()
## x dplyr::lag()    masks stats::lag()
alif<-alif %>% filter(Province!="AJK",Province!="GB",Province!="ICT",Province!="FATA")

Including Plots

You can also embed plots, for example: