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])

plot(union[1])

# Create subset for Ramna and Jatrabari
sd <- district %>%
filter(District %in% c("Dhaka"))
Error in district %>% filter(District %in% c("Dhaka")) :
could not find function "%>%"
library(dplyr)
# Create subset for Ramna and Jatrabari
subset_upazila <- upazila %>%
filter(Division %in% c("Rajshahi"))
plot(subset_upazila[1], col = "green", border = "red")

library(dplyr)
# Create subset for Ramna and Jatrabari
subset_upazila <- upazila %>%
filter(District %in% c("Barisal"))
plot(subset_upazila[1])
`
library(dplyr)
# Create subset for Ramna and Jatrabari
subset_upazila <- upazila %>%
filter(District%in% c("Barisal"))
plot(subset_upazila[1], col = "red", border = "pink")

NA
NA
LS0tDQp0aXRsZTogIlIgTm90ZWJvb2siDQpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sNCi0tLQ0KDQpgYGB7cn0NCmxpYnJhcnkoYmFuZ2xhZGVzaCkNCg0KY291bnRyeSA8LSBnZXRfbWFwKCJjb3VudHJ5IikNCmRpdmlzaW9uIDwtIGdldF9tYXAoImRpdmlzaW9uIikNCmRpc3RyaWN0IDwtIGdldF9tYXAoImRpc3RyaWN0IikNCnVwYXppbGEgPC0gZ2V0X21hcCgidXBhemlsYSIpDQp1bmlvbiA8LSBnZXRfbWFwKCJ1bmlvbiIpDQoNCg0KcGxvdChjb3VudHJ5WzFdKQ0KcGxvdChkaXZpc2lvblsxXSkNCnBsb3QoZGlzdHJpY3RbMV0pDQpwbG90KHVuaW9uWzFdKQ0KYGBgDQoNCg0KYGBge3J9DQojIENyZWF0ZSBzdWJzZXQgZm9yIFJhbW5hIGFuZCBKYXRyYWJhcmkNCnNkIDwtIGRpc3RyaWN0ICU+JQ0KICBmaWx0ZXIoRGlzdHJpY3QgJWluJSBjKCJEaGFrYSIpKQ0KDQpwbG90KHNkWzFdKQ0KDQpgYGANCg0KYGBge3J9DQpsaWJyYXJ5KGRwbHlyKQ0KDQoNCg0KIyBDcmVhdGUgc3Vic2V0IGZvciBSYW1uYSBhbmQgSmF0cmFiYXJpDQpzdWJzZXRfdXBhemlsYSA8LSB1cGF6aWxhICU+JQ0KICBmaWx0ZXIoRGl2aXNpb24gJWluJSBjKCJSYWpzaGFoaSIpKQ0KDQpwbG90KHN1YnNldF91cGF6aWxhWzFdLCBjb2wgPSAiZ3JlZW4iLCBib3JkZXIgPSAicmVkIikNCg0KYGBgDQoNCg0KYGBge3J9DQpsaWJyYXJ5KGRwbHlyKQ0KDQojIENyZWF0ZSBzdWJzZXQgZm9yIFJhbW5hIGFuZCBKYXRyYWJhcmkNCnN1YnNldF91cGF6aWxhIDwtIHVwYXppbGEgJT4lDQogIGZpbHRlcihEaXN0cmljdCAlaW4lIGMoIkJhcmlzYWwiKSkNCg0KcGxvdChzdWJzZXRfdXBhemlsYVsxXSkNCg0KYA0KYGBgDQoNCg0KYGBge3J9DQoNCmBgYA0KDQoNCg0KDQoNCmBgYHtyfQ0KDQpsaWJyYXJ5KGRwbHlyKQ0KDQoNCg0KIyBDcmVhdGUgc3Vic2V0IGZvciBSYW1uYSBhbmQgSmF0cmFiYXJpDQpzdWJzZXRfdXBhemlsYSA8LSB1cGF6aWxhICU+JQ0KICBmaWx0ZXIoRGlzdHJpY3QlaW4lIGMoIkJhcmlzYWwiKSkNCg0KcGxvdChzdWJzZXRfdXBhemlsYVsxXSwgY29sID0gInJlZCIsIGJvcmRlciA9ICJwaW5rIikNCg0KDQpgYGANCg0KDQoNCg0KDQoNCg0KDQoNCg0KDQoNCg0KDQoNCg0KDQoNCg0KDQoNCg0KDQoNCg0KDQoNCg0KDQoNCg0KYGBge3J9DQoNCmBgYA0KDQoNCg0KDQoNCg0KDQoNCg0K