jpmesh (version 2.1.0)

coarse_gather: Gather more coarse mesh

Description

Return coarse gather mesh codes

Usage

coarse_gather(meshcode, distinct = FALSE)

Arguments

meshcode

character. mesh code

distinct

return unique meshcodes

Value

meshcode

Examples

# NOT RUN {
m <- c("493214294", "493214392", "493215203", "493215301")
coarse_gather(m)
coarse_gather(coarse_gather(m))
coarse_gather(coarse_gather(m), distinct = TRUE)
# }