reg <- bf_registry(name = "testBF", description = "test bitfield",
template = bf_tbl)
reg <- bf_map(protocol = "na", data = bf_tbl, registry = reg,
x = year)
str(reg@flags)
bf_flag(registry = reg, flag = "na_year")
Run the code above in your browser using DataLab