OFFSET
1,1
COMMENTS
See A256865 for a variant where divisibility by prime(d+1) is required instead.
From Robert Israel, Apr 04 2024: (Start)
Since digit 0 is not allowed, terms can't be divisible by 5, so digit 3 is also not allowed.
All terms are even. (End)
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
P:= [seq(ithprime(i), i=1..4)]:
filter:= proc(n) local S, s;
S:= convert(convert(n, base, 5), set);
if member(0, S) then return false fi;
n mod mul(P[s], s=S) = 0
end proc:
select(filter, [$1..10^4]); # Robert Israel, Apr 04 2024
PROG
(PARI) is(n, b=5)=!for(i=1, #d=Set(digits(n, b)), (!d[i]||n%prime(d[i]))&&return)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Apr 11 2015
STATUS
approved