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