%I A143798
%S A143798 5,17,31,43,73,101,197,241,269,283,347,521,599,811,827,829,1019,1049,
%T A143798 1051,1153,1289,1787,2089,2143,2341,2689,2731,2969,3257,3259,3391,4051,
%U A143798 4093,4129,4159,4217,4481,4721,4931,5881,6361,6793,6959,7759,8009,8233
%N A143798 Twin prime numbers of the form : i^2+j^3, as sum of square and cube.
%e A143798 31=2^2+3^3; 43=4^2+3^3.
%t A143798 lst1={};For[i=1,i<=60,For[j=1,j<=60,c=i^2+j^3;If[((PrimeQ[c]&&PrimeQ[c-2])||(PrimeQ[c]&&PrimeQ[c+2])),
               AppendTo[lst1,c]];j++ ];i++ ];lst2=Take[Union[lst1],80]
%Y A143798 Sequence in context: A143103 A091851 A079292 this_sequence A031013 A031370 
               A147434
%Y A143798 Adjacent sequences: A143795 A143796 A143797 this_sequence A143799 A143800 
               A143801
%K A143798 nonn
%O A143798 1,1
%A A143798 Vladimir Orlovsky (4vladimir(AT)gmail.com), Sep 01 2008