OFFSET
1,2
EXAMPLE
a(5)=26, since 26 divides its digital sumorial, which is A131383(26)=182.
PROG
(PARI) a=1; for(n=2, 10^6, if(a%(n-1)==0, print1(n-1", ")); x=divisors(n); L=numdiv(n); a+=n; \ for(i=2, L-1, d=x[i]; k=n; while(k%d==0, a-=d-1; k\=d))) - Robert Gerbicz, May 09 2008
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Hieronymus Fischer, Dec 24 2007
EXTENSIONS
4 more terms from Robert Gerbicz, May 09 2008
a(16)-a(23) from Hieronymus Fischer, Jul 31 2008
STATUS
approved