79792074

Date: 2025-10-16 11:17:08
Score: 0.5
Natty:
Report link

I know you asked for tidyverse but here's a data.table option

library(data.table)

df = rbindlist(l, idcol = T)
df[, element := 1:.N, by=.(.id)]
df = df[, lapply(names(comb_funcs), \(x) comb_funcs[[x]](get(x))), 
        by = .(element)][, element := NULL]
setnames(df, new = names(comb_funcs))
df
Reasons:
  • Low length (0.5):
  • Has code block (-0.5):
  • Low reputation (0.5):
Posted by: Stephen