login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A047779 Abundant or perfect numbers k such that neither k-1 nor k+1 is a prime. 1
56, 120, 144, 160, 176, 186, 204, 208, 216, 220, 246, 260, 288, 300, 304, 320, 324, 340, 342, 364, 392, 414, 416, 426, 474, 476, 496, 516, 528, 532, 534, 544, 550, 552, 560, 580, 582, 624, 636, 650, 666, 680, 696, 704, 714, 736, 748, 780, 784, 792, 800 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

LINKS

Amiram Eldar, Table of n, a(n) for n = 1..10000

Haskell Program for Abundant and Perfect Numbers [Cached copy at the Wayback Machine].

EXAMPLE

a(1) = 56 because 55 and 57 are composite and the sum of the divisors of 56 is 64 which is >= 56 and no integer < 56 has this property.

MATHEMATICA

Select[Range[800], DivisorSigma[1, #] >= 2 # && And @@ CompositeQ[# + {-1, 1}] &] (* Amiram Eldar, Feb 09 2020 *)

PROG

(PARI) isok(n) = (sigma(n) >= 2*n) && ! isprime(n-1) && ! isprime(n+1) \\ Michel Marcus, Jun 12 2013

CROSSREFS

A023196 is a superset.

Sequence in context: A219458 A054891 A118161 * A044243 A044624 A157330

Adjacent sequences:  A047776 A047777 A047778 * A047780 A047781 A047782

KEYWORD

easy,nonn

AUTHOR

Tony Davie (ad(AT)dcs.st-and.ac.uk)

EXTENSIONS

More terms from Michel Marcus, Jun 12 2013

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified January 27 19:29 EST 2022. Contains 350611 sequences. (Running on oeis4.)