uncount function

Uncount a data.table