The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A133855 Primes p such that p-1 and p+1 are abundant numbers. 3
 19, 41, 71, 79, 89, 101, 103, 113, 139, 197, 199, 223, 271, 281, 307, 349, 353, 367, 379, 401, 439, 449, 461, 463, 491, 499, 521, 571, 607, 617, 619, 641, 643, 701, 727, 739, 761, 769, 811, 821, 859, 881, 911, 919, 929, 941, 953, 967, 991, 1039, 1061, 1063 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Harvey P. Dale, Table of n, a(n) for n = 1..1000 EXAMPLE 19-1=18=2*3*3, s/n=39/18>2, 18 is abundant, 19+1=20=2*2*5, s/n=42/20>2, 20 is abundant, so a(1)=19 MAPLE with(numtheory): a:=proc(n) if isprime(n)=true and 0 2*(# - 1) && (Plus @@ Divisors[ # + 1]) > 2*(# + 1) &] (* Stefan Steinerberger, Jan 21 2008 *) PROG (PARI) is(n)=sigma(if(n%6==1, n+1, n-1), -1)>2 && isprime(n) \\ Charles R Greathouse IV, Aug 29 2015 CROSSREFS Sequence in context: A155024 A323391 A248339 * A280170 A262608 A141855 Adjacent sequences:  A133852 A133853 A133854 * A133856 A133857 A133858 KEYWORD nonn AUTHOR Pierre CAMI, Jan 07 2008 EXTENSIONS Corrected and extended by Stefan Steinerberger and Emeric Deutsch, Jan 21 2008 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.

Last modified January 19 04:09 EST 2020. Contains 331031 sequences. (Running on oeis4.)