cp's OEIS Frontend

A120364 Primes p such that p^2-p-1 and p^2-p+1 are twin primes.

%I A120364 #23 Jul 25 2021 11:55:27
%S A120364 3,7,67,139,379,457,1201,1381,1549,1567,1747,1789,2137,2557,2647,2731,
%T A120364 4057,4159,4447,4561,5179,5641,6397,9157,9661,9829,9967,10369,11467,
%U A120364 11677,12487,12781,13339,13399,15241,17299,17977,19207,19417,19429
%N A120364 Primes p such that p^2-p-1 and p^2-p+1 are twin primes.
%C A120364 One more than the entries of (A006093 intersect A088485). - _Danny Rorabaugh_, May 15 2017
%H A120364 Pierre CAMI, <a href="/A120364/b120364.txt">Table of n, a(n) for n = 1..10000</a>
%e A120364 3*3-3-1=5 3*3-3+1=7, 5 and 7 twin primes so a(1)=3;
%e A120364 5*5-5-1=19 5*5-5+1=21 composite;
%e A120364 7*7-7-1=41 7*7-7+1=43, 41 and 43 twin primes so a(2)=7.
%t A120364 Select[Prime[Range[2500]], PrimeQ[ #^2 - # - 1] && PrimeQ[ #^2 - # + 1] &] (* _Stefan Steinerberger_, Jul 22 2006 *)
%t A120364 Select[Prime[Range[2500]],AllTrue[#^2-#+{1,-1},PrimeQ]&] (* _Harvey P. Dale_, Jul 25 2021 *)
%Y A120364 Cf. A088483, A088485.
%K A120364 nonn
%O A120364 1,1
%A A120364 _Pierre CAMI_, Jun 26 2006
%E A120364 More terms from _Stefan Steinerberger_ and _Rick L. Shepherd_, Jul 22 2006