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!)
A086715 Primes p such that A001414(p-1) and A001414(p+1) are both prime, where A001414 = sum of primes dividing n (with repetition). 1
11, 53, 89, 251, 359, 383, 389, 463, 487, 809, 857, 863, 1109, 1217, 1429, 1451, 1549, 2039, 2089, 2459, 2903, 3037, 3457, 3541, 3709, 3727, 3739, 4259, 4373, 4451, 4733, 4903, 5641, 5851, 5939, 6359, 7019, 7079, 7129, 7219, 7549, 8059, 8839, 8929, 9007 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
LINKS
EXAMPLE
a(2)=53 because it is prime and 52=2^2*13, 54=2*3^3 and 2+2+13=17 and 2+3+3+3=11.
MATHEMATICA
primeSopfQ[n_] := PrimeQ[Plus @@ Times @@@ FactorInteger[n]]; seqQ[n_] := PrimeQ[n] && AllTrue[{n - 1, n + 1}, primeSopfQ]; Select[Range[10^4], seqQ] (* Amiram Eldar, Dec 14 2019 *)
PROG
(Magma) [ n : n in [3..9100] | IsPrime(n) and IsPrime(&+[ k[1]*k[2] : k in Factorization(n-1)]) and IsPrime(&+[ k[1]*k[2] : k in Factorization(n+1)]) ]; /* Klaus Brockhaus, Mar 24 2007 */
CROSSREFS
Cf. A001414.
Sequence in context: A370502 A004622 A045471 * A178453 A225582 A164580
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Jul 29 2003
EXTENSIONS
Checked by Klaus Brockhaus, Mar 24 2007
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 03:51 EDT 2024. Contains 371264 sequences. (Running on oeis4.)