%I A143793
%S A143793 180,522,810,1620,1872,2088,2340,3258,3330,4050,4338,4932,5652,5850,
%T A143793 6570,6660,6948,7488,8010,8388,8820,9000,10530,10890,11700,12240,14562,
%U A143793 15138,16362,16452,16650,17658,17748,19080,19890,19962,20232,20772
%N A143793 Averages of twin primes of the form : i^2+j^2, as sum of two squres.
%e A143793 180=6^2+12^2, 179 and 181 twin primes, 522=9^2+21^2, 521 and 523 twin 
               primes.
%t A143793 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]
%Y A143793 Sequence in context: A015233 A154361 A004532 this_sequence A032774 A032776 
               A081380
%Y A143793 Adjacent sequences: A143790 A143791 A143792 this_sequence A143794 A143795 
               A143796
%K A143793 nonn
%O A143793 1,1
%A A143793 Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 01 2008