(for n 1 1e4(if(is(len:dedup:+""n)2)prn.n))