The OEIS is supported by the many generous donors to the OEIS Foundation.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #6 Dec 18 2021 19:07:32
%S 5,11,29,41,107,137,149,197,239,347,431,461,569,599,659,809,821,1019,
%T 1229,1289,1481,1619,1787,1877,1931,2027,2129,2141,2309,2339,2657,
%U 2687,2801,2969,3119,3329,3467,3557,3581,4001,4019,4127,4241,4421,4547,4649
%N Lesser of twin primes p1 such that p2+(p2^2-p1^2) is a prime number.
%C 5+(7^2-5^2)=5+24=29,...
%H Harvey P. Dale, <a href="/A174917/b174917.txt">Table of n, a(n) for n = 1..1000</a>
%t lst={};Do[p1=Prime[n];p2=p1+2;If[PrimeQ[p2]&&PrimeQ[p2+(p2^2-p1^2)],AppendTo[lst,p1]],{n,4*6!}];lst
%t Select[Partition[Prime[Range[700]],2,1],#[[2]]-#[[1]]==2&& PrimeQ[ #[[2]]+ #[[2]]^2-#[[1]]^2]&][[All,1]] (* _Harvey P. Dale_, Dec 18 2021 *)
%Y Cf. A001359, A174913, A174915, A174916
%K nonn
%O 1,1
%A _Vladimir Joseph Stephan Orlovsky_, Apr 02 2010