for n=1,1e4 do s=(""..n):gsub(n%10,"")x=s~=s:match(s:sub(-1).."+")or print(n)end