A135100 Numbers which divide their digital sumorial (see A131383).

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

Links

Table of n, a(n) for n=1..23.

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

Cf. A007953, A054899, A131383, A131451, A133620, A133900, A134599.

Sequence in context: A167367 A024858 A293047 * A205485 A344261 A055486

Adjacent sequences: A135097 A135098 A135099 * A135101 A135102 A135103

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