Assignment 02

Library

library(bangladesh)
library (dplyr)

## 
## Attaching package: 'dplyr'

## The following objects are masked from 'package:stats':
## 
##     filter, lag

## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

Data

division <- get_map("division")
district <- get_map("district")
upazila <- get_map("upazila")
subset_division <- division %>%
filter (Division %in% c("Rajshahi"))
subset_district <- district %>%
filter(District %in% c("Gazipur"))
subset_upazila <- upazila %>%
filter(Upazila %in% c("Ramna", "Savar", "Jatrabari"))

Division

plot(division[1])

Own Division

plot(subset_division[1], col = "skyblue", border = "orange", main = "My Division - Rajshahi")

District

plot(district[1])

Own District

plot(subset_district[1], col = "gold", border = "blue", main = "My District - Gazipur")

Upazila

plot(upazila[1])

3 Upazila

plot(subset_upazila[1], main = " Savar, Ramna, Jatrabari")