# \donttest{
f <- tempfile(fileext = ".vtr")
df <- data.frame(taxonID = 1:3,
canonicalName = c("Quercus robur", "Pinus sylvestris",
"Fagus sylvatica"))
write_vtr(df, f)
blk <- materialize(tbl(f) |> select(taxonID, canonicalName))
hits <- block_lookup(blk, "canonicalName",
c("Quercus robur", "Pinus sylvestris"))
unlink(f)
# }
Run the code above in your browser using DataLab