Expanding a data.table to create grouped principle and alias combinations

Question

I have the following data.table:

require(data.table)
dt = data.table(structure(list(postcode = c("4101", "4101", "4101&q