OFFSET
1,2
COMMENTS
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..150
Wikipedia, Primorial number system.
EXAMPLE
9 is a term since 9 in primorial base is 111 (9 = 3! + 2! + 1!) and 9 is divisible by 1*1*1 = 1.
MATHEMATICA
max = 12; bases = Prime@Range[max, 1, -1]; nmax = Times @@ bases - 1; q[n_] := FreeQ[(d = IntegerDigits[n, MixedRadix[bases]]), 0] && Divisible[n, Times @@ d]; Select[Range[1, 10^5, 2], q]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amiram Eldar, Feb 11 2021
STATUS
approved