|
|
OFFSET
| 1,1
|
|
|
COMMENTS
| It is conjectured that there are no odd weird numbers (A006037), i.e. that all odd abundant numbers (A005231) are pseudoperfect (A005835); this sequence lists those which are not equal to the sum of a subset of proper divisors > 1.
No second term in the range <= 53850001. - R. J. Mathar, Mar 21 2011
|
|
|
PROG
| (PARI) forstep(i=1, 10^7, 2, sigma(i)>2*i | next; isA005835(i, vecextract(divisors(i), "2..-2")) | print1(i", "))
|
|
|
CROSSREFS
| Cf. A005231, A136446.
Sequence in context: A166263 A069314 A022208 * A186822 A172664 A172676
Adjacent sequences: A122033 A122034 A122035 * A122037 A122038 A122039
|
|
|
KEYWORD
| nonn,bref,more,nice
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), Apr 11 2008, following correspondence from R. K. Guy, M. F. Hasler and others.
|
|
|
EXTENSIONS
| Comments and PARI code from M. F. Hasler, Apr 12 2008
|
|
