> bench::mark(
+ 	old = direction_group_old(DT),
+ 	new = direction_group(DT),
+ 	relative = TRUE
+ )
# A tibble: 2 × 13
  expression   min median `itr/sec` mem_alloc `gc/sec` n_itr  n_gc total_time result memory     time       gc      
  <bch:expr> <dbl>  <dbl>     <dbl>     <dbl>    <dbl> <int> <dbl>   <bch:tm> <list> <list>     <list>     <list>  
1 old         213.   155.        1       795.     1        1    22      3.86s <dt>   <Rprofmem> <bench_tm> <tibble>
2 new           1      1       144.        1      1.03    19     3   510.83ms <dt>   <Rprofmem> <bench_tm> <tibble>