replace do.call with faster data.table function rbindlist