library(bangladesh)
country <- get_map("country")
plot(country[1], col = "black", border = "red")

division <- get_map("division")
plot(division[1], col = terrain.colors(7))
## Warning in plot.sf(division[1], col = terrain.colors(7)): col is not of length
## 1 or nrow(x): colors will be recycled; use pal to specify a color palette

upazila <- get_map("upazila") 
plot(upazila[1], col = colors <- heat.colors(7))
## Warning in plot.sf(upazila[1], col = colors <- heat.colors(7)): col is not of
## length 1 or nrow(x): colors will be recycled; use pal to specify a color
## palette