login
A059394
Special safe primes (from A005385) such that the next prime is also a safe prime.
1
5, 7, 467, 1307, 2447, 5087, 5927, 12527, 18947, 44687, 55079, 78467, 79943, 83207, 93383, 103007, 105143, 111443, 118787, 128879, 143687, 164987, 196907, 204587, 207227, 208787, 229487, 232823, 236507, 257627, 267143, 275987, 289319, 296159
OFFSET
1,1
LINKS
EXAMPLE
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).
MATHEMATICA
ss[x_] := PrimeQ[(Prime[x]-1)/2]&&PrimeQ[(Prime[x+1]-1)/2] t=Prime[Flatten[Position[Table[ss[w], {w, 1, 100000}], True]]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Jan 29 2001
STATUS
approved