J-uby, 66 61 bytes
:group_by+:next|:values|:*&(:zip%(:size|:*)|:*&:sum)|:flatten
Surely there is a way to improve this. Yep, + is very useful.
J-uby,
Razetime
- 27.4k
- 3
- 29
- 72