login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

Special safe primes (from A005385) such that the next prime is also a safe prime.
1

%I #9 Jan 13 2020 09:32:53

%S 5,7,467,1307,2447,5087,5927,12527,18947,44687,55079,78467,79943,

%T 83207,93383,103007,105143,111443,118787,128879,143687,164987,196907,

%U 204587,207227,208787,229487,232823,236507,257627,267143,275987,289319,296159

%N Special safe primes (from A005385) such that the next prime is also a safe prime.

%H Amiram Eldar, <a href="/A059394/b059394.txt">Table of n, a(n) for n = 1..10000</a>

%e For {467,55079,103007,728579,887759,..} safe primes {479,55103,103043,728627,887819} are the next primes, whose differences are 12,24,36,48,60,.. respectively,not necessarily equal to 12, the possible minimum (see A059322).

%t ss[x_] := PrimeQ[(Prime[x]-1)/2]&&PrimeQ[(Prime[x+1]-1)/2] t=Prime[Flatten[Position[Table[ss[w], {w, 1, 100000}], True]]]

%Y Cf. A005385, A005384, A059322, A059323, A059327.

%K nonn

%O 1,1

%A _Labos Elemer_, Jan 29 2001