OFFSET
1,3
COMMENTS
LINKS
EXAMPLE
13 in primorial base is 201, which has no repeated digits, hence 13 is in the sequence.
14 in primorial base is 210, which has no repeated digits, hence 14 is also in the sequence.
15 in primorial base is 211, so 15 is not in the sequence on account of the digit 1 appearing twice in its primorial base representation.
MATHEMATICA
q[n_] := Module[{k = n, p = 2, s = {}, r}, While[{k, r} = QuotientRemainder[k, p]; k != 0 || r != 0, AppendTo[s, r]; p = NextPrime[p]]; UnsameQ @@ s]; Select[Range[0, 210], q] (* Amiram Eldar, Mar 13 2024 *)
PROG
(PARI) is(n) = my (s=0); forprime (p=2, oo, if (n==0, return (1)); my (d=n%p); if (bittest(s, d), return (0), s+=2^d; n\=p))
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Rémy Sigrist, Nov 17 2018
STATUS
approved