OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
67 is in the sequence because 67 + 4 = 71 and 67 + 4 + 2 = 73 are primes, the prime prior to 67 is 61, the prime after 73 is 79, and the corresponding differences are 6 and 6. The d-pattern "around 67" is {6,4,2,6}.
MAPLE
P:= select(isprime, [2, seq(i, i=3..30000, 2)]):
G:= P[2..-1]-P[1..-2]:
J:=select(i -> G[i-1] >= 6 and G[i] = 4 and G[i+1] = 2 and G[i+2] >= 6, [$2..nops(G)-2]):
P[J]; # Robert Israel, Oct 10 2025
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Jan 26 2000
STATUS
approved
