A096477 Subscripts for "secondary twin-primes": numbers n such that prime(1+prime(n)) - prime(prime(n)) = A073124(n) = 2.

1, 2, 3, 4, 6, 7, 13, 14, 23, 24, 29, 30, 40, 59, 63, 65, 71, 74, 90, 103, 106, 110, 112, 117, 122, 128, 132, 187, 188, 193, 207, 248, 257, 258, 267, 271, 281, 285, 292, 296, 299, 300, 303, 304, 311, 317, 325, 340, 343, 344, 354, 356, 360, 368, 382, 389, 395, 402

Offset

1,2

Links

Ivan Neretin, Table of n, a(n) for n = 1..10000

Example

n = 24 means that p[1+p[24]]-p[p[24]] = p[1+89]-p[89] = 463-461 = 2

Mathematica

Flatten[Position[Table[Prime[Prime[n]+1]-Prime[Prime[n]], {n, 1, 1000}], 2]]

Crossrefs

Cf. A072677, A006450, A073124.

Sequence in context: A287924 A039947 A339591 * A039059 A151892 A162570

Adjacent sequences: A096474 A096475 A096476 * A096478 A096479 A096480

Keyword

nonn

Author

Labos Elemer, Jun 23 2004

Status

approved