OFFSET
1,1
COMMENTS
A161020 is a subsequence.
LINKS
Robert Israel, Table of n, a(n) for n = 1..373
EXAMPLE
2727 is a term because 2277 + 2727 + 2772 + 7227 + 7272 + 7722 = 29997 is divisible by 2727.
MAPLE
filter:= proc(x) local L, D, n, M, s, j;
L:= convert(x, base, 10);
D:= [seq(numboccur(j, L), j=0..9)];
if numboccur(0, D) = 9 then return false fi;
n:= nops(L);
M:= n!/mul(d!, d=D);
s:= add(j*D[j+1], j=0..9);
evalb(((10^n-1)*M/9/n*s) mod x = 0)
end proc:
select(filter, [$1..2*10^5]); # Robert Israel, Sep 12 2016
PROG
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Altug Alkan, Sep 05 2016
STATUS
approved