login
A135100
Numbers which divide their digital sumorial (see A131383).
9
1, 3, 4, 15, 26, 2573, 17226, 19786, 22083, 58133, 67693, 223657, 376460, 464713, 497068, 2621204, 4553376, 6000136, 7671158, 13975944, 14074903, 52731198, 82594577
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
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