|
Search: id:A138763
|
|
|
| A138763 |
|
Primes p1 such that p1^2+p2^3=p3 and p1^3+p2^2=p4, p3 and p4 are average of twin primes. p1 and p2 consecutive primes, p1 < p2. |
|
+0 1
|
| |
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
a={}; Do[p1=Prime[n]; p2=Prime[n+1]; p3=p1^2+p2^3; p4=p1^3+p2^2; If[PrimeQ[p3-1]&&PrimeQ[p3+1]&&PrimeQ[p4-1]&&PrimeQ[p4+1], AppendTo[a, p1]], {n, 13^5}]; Print[a];
|
|
CROSSREFS
|
Sequence in context: A101699 A122148 A068736 this_sequence A156176 A013772 A034247
Adjacent sequences: A138760 A138761 A138762 this_sequence A138764 A138765 A138766
|
|
KEYWORD
|
nonn,bref
|
|
AUTHOR
|
Vladimir Orlovsky (4vladimir(AT)gmail.com), May 15 2008
|
|
|
Search completed in 0.002 seconds
|