# We run the code in a fresh session
library(tidyverse)
library(duckdb)
library(data.table)
library(collapse)
library(polars)
polars_info() # 8 threads
setDTthreads(8)
con <- dbConnect(duckdb(config = list(threads = "8")))
set.seed(1)
N <- 10^(5:8)
m_queries <- 3
results <- vector("list", length(N) * m_queries)
for (i in seq_along(N)) {
n <- N(i)
# Create data
...
