A052162 Primes at which difference pattern X4Y (X and Y >= 6) occurs in A001223.

79, 127, 163, 379, 397, 439, 487, 499, 673, 739, 757, 769, 907, 937, 967, 1009, 1213, 1549, 1567, 1579, 1597, 2203, 2293, 2347, 2389, 2437, 2473, 2539, 2617, 2749, 2833, 2857, 2953, 3019, 3037, 3079, 3187, 3217, 3319, 3343, 3613, 3697, 3793, 3877, 3907

Offset

1,1

Links

Michael De Vlieger, Table of n, a(n) for n = 1..10000

Example

127 is in the sequence because 127 + 4 = 131 is prime, but the difference pattern around 127 is {[113] 14 [127] 4 [131] 6 [137]}.

Mathematica

s = Differences@ Prime@ Range[600]; Prime@ Select[Position[s, 4][[All, 1]], And[s[[# - 1]] >= 6, s[[# + 1]] >= 6] &] (* Michael De Vlieger, Aug 17 2023 *)

Crossrefs

Cf. A001223, A052160, A052162-A052168, A022008, A047078.

Sequence in context: A135143 A139503 A134240 * A155814 A135985 A142520

Adjacent sequences: A052159 A052160 A052161 * A052163 A052164 A052165

Keyword

nonn

Author

Labos Elemer, Jan 26 2000

Status

approved