library(tidyverse) library(duckdbfs) library(mapdeck) library(tictoc) library(h3) tic() tic() q <- open_dataset(here::here("data/ais/trail")) |> filter(.cid > 0, …