|
| |
|
|
A143793
|
|
Averages of twin primes of the form : i^2+j^2, as sum of two squares.
|
|
0
| |
|
|
180, 522, 810, 1620, 1872, 2088, 2340, 3258, 3330, 4050, 4338, 4932, 5652, 5850, 6570, 6660, 6948, 7488, 8010, 8388, 8820, 9000, 10530, 10890, 11700, 12240, 14562, 15138, 16362, 16452, 16650, 17658, 17748, 19080, 19890, 19962, 20232, 20772
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| 180=6^2+12^2, 179 and 181 twin primes, 522=9^2+21^2, 521 and 523 twin primes.
|
|
|
MATHEMATICA
| lst={}; For[i=1, i<=256, For[j=i+1, j<=i+256, c=i^2+j^2; If[PrimeQ[c-1]&&PrimeQ[c+1], AppendTo[lst, c]]; j++ ]; i++ ]; Take[Union[lst], 80]
|
|
|
CROSSREFS
| Sequence in context: A008891 A015233 A004532 * A205818 A032774 A032776
Adjacent sequences: A143790 A143791 A143792 * A143794 A143795 A143796
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 01 2008
|
| |
|
|
