map_quad() now pads quadrat name with 0 up to a width of four digits

These two packages automatically load many other useful packages, including dplyr and fgeo.map().

library(tidyverse)
library(fgeo)

Get some data.

vft <- as_tibble(sinharaja::sinh_vft)

Subset only one quadrat and one census (the top ones).

vft_q1 <- top(vft, QuadratName) %>% top(CensusID)
vft_q1

To show this feature, force quadrat to have only one digit.

vft_q1$QuadratName <- "0"
unique(vft_q1$QuadratName)

#> [1] "0"

#> 0

Notice that the quadrat name on the map is not “0” but “0000”.

first(map_tag(vft_q1))

Same here.

map_quad(vft_q1)

#> * Appending tags of dead trees with the suffix '.d'

#> * Standarizing `dbh` by the count of `dbh` measurements

#> $`0`