# NOT RUN {
how_many_lgas <- function(state) {
require(naijR)
stopifnot(all(is_state(state)))
cat(sprintf("No. of LGAs in %s State:", state),
length(lgas(state)),
fill = TRUE)
}
how_many_lgas("Sokoto")
how_many_lgas("Ekiti")
# }
Run the code above in your browser using DataLab