A143793 - OEIS

%I #5 Mar 31 2012 12:38:16

%S 180,522,810,1620,1872,2088,2340,3258,3330,4050,4338,4932,5652,5850,

%T 6570,6660,6948,7488,8010,8388,8820,9000,10530,10890,11700,12240,

%U 14562,15138,16362,16452,16650,17658,17748,19080,19890,19962,20232,20772

%N Averages of twin primes of the form : i^2+j^2, as sum of two squares.

%e 180=6^2+12^2, 179 and 181 twin primes, 522=9^2+21^2, 521 and 523 twin primes.

%t 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]

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Sep 01 2008