OFFSET
1,2
COMMENTS
A variant of A256879 where digits 0 are forbidden and divisibility by prime(d) is required.
From Robert Israel, Aug 01 2019: (Start)
If n is in the sequence and is even, then 9*n is in the sequence.
If n is in the sequence and 9^k > n, then (9^k+1)*n is in the sequence.
All multiples of 223092870 are in the sequence.
(End)
LINKS
Robert Israel, Table of n, a(n) for n = 1..3000
FORMULA
a(n) ~ 223092870*n. - Robert Israel, Aug 01 2019
MAPLE
P:= [seq(ithprime(i), i=1..9)]:
filter:= proc(n) local L;
L:= convert(convert(n, base, 9), set);
L:= map(t -> P[t+1], L);
n mod convert(L, `*`) = 0
end proc:
select(filter, [$0..10000]); # Robert Israel, Aug 01 2019
PROG
is(n, b=9)=!for(i=1, #d=Set(digits(n, b)), n%prime(d[i]+1)&&return)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
M. F. Hasler, Apr 11 2015
STATUS
approved