%I A123079
%S A123079 5,13,17,29,41,61,73,101,109,137,149,181,193,197,229,241,269,281,313,
%T A123079 349,421,433,461,521,569,601,617,641,661,809,821,829,857,881,1021,1033,
%U A123079 1049,1061,1093,1153,1229,1277,1289,1301,1321,1429,1453,1481,1489,1609
%N A123079 Twin primes of form 4k+1.
%p A123079 a[1]:=5:i:=2:for k from 6 to 3000 do if isprime(k) and isprime(k+2) then 
               b:=k:c:=k+2: if b mod 4 = 1 then a[i]:=b:i:=i+1 fi: if c mod 4 = 
               1 then a[i]:=c:i:=i+1 fi:fi od: seq(a[n],n=1..i-1);
%Y A123079 Cf. A122564, A122565, A001097.
%Y A123079 Sequence in context: A002144 A111055 A145016 this_sequence A038938 A053028 
               A084165
%Y A123079 Adjacent sequences: A123076 A123077 A123078 this_sequence A123080 A123081 
               A123082
%K A123079 nonn
%O A123079 1,1
%A A123079 Miklos Kristof (kristmikl(AT)freemail.hu), Sep 27 2006