list comprehension is more appropriate here, methinks. Same below with the Assigned fold; should be something like:

[{Num, <<>>} || Num <- NewNums, not (lists:member(Num, NewNums))]

The Assigned should just be a straight LC