R Notebook

library(bangladesh)

library(bangladesh)

country <- get_map("country")
division <- get_map("division")
district <- get_map("district")
upazila <- get_map("upazila")
union <- get_map("union")

plot(country[1])

plot(division[1])

plot(district[1])

library(dplyr)

# Create subset for Chapainanabgang
subset_upazila <-  district%>%
  filter(District %in% c("Rajshahi"))

plot(subset_upazila[1], col = "green", border = "red" )

NA
NA
NA
NA

# Create subset for Bamna and Patharghata
subset_upazila <- district %>%
  filter(District %in% c( "Barguna"))

plot(subset_upazila[1], col = "black", border = "pink")

NA
NA