OFFSET
1,2
COMMENTS
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..14620 (terms below A002110(8) = 19#)
EXAMPLE
3 is a term since its primorial-base presentation, 11, has only odd digits.
21 is a term since its primorial-base presentation, 311, has only odd digits.
MATHEMATICA
With[{max = 5}, bases = Prime@ Range[max, 1, -1]; nmax = Times @@ bases - 1; prmBaseDigits[n_] := IntegerDigits[n, MixedRadix[bases]]; Select[Range[1, nmax, 2], AllTrue[prmBaseDigits[#], OddQ] &]]
PROG
(PARI) is(n) = {my(p = 2); if(n < 1, return(0)); while(n > 0, if((n%p)%2 == 0, return(0)); n \= p; p = nextprime(p+1)); return(1); }
CROSSREFS
Subsequence: A143293.
Similar sequences: A003462 \ {0} (ternary), A014261 (decimal), A032911 (base 4), A032912 (base 5), A033032 (base 6), A033033 (base 7), A033034 (base 8), A033035 (base 9), A033036 (base 11), A033037 (base 12), A033038 (base 13), A033039 (base 14), A033040 (base 15), A033041 (base 16), A126646 (binary), A351894 (factorial base).
KEYWORD
nonn,base
AUTHOR
Amiram Eldar, May 23 2023
STATUS
approved