A391800 Primes indexed by A391797.

13, 19, 37, 53, 71, 89, 103, 107, 127, 139, 157, 173, 193, 199, 229, 233, 251, 263, 271, 283, 311, 313, 347, 349, 353, 367, 401, 419, 433, 439, 461, 463, 499, 509, 523, 541, 563, 569, 587, 599, 607, 613, 619, 643, 659, 661, 677, 701, 733, 743, 757, 761, 787

Offset

1,1

Comments

The sequences A391800, A391801, A391802 partition the primes, A000040.

Links

Table of n, a(n) for n=1..53.

Formula

a(n) = A000040(A391797(n)).

Mathematica

z = 300; p[n_] := Prime[n];
a[n_] := p[2 n + 2] - p[2 n] - p[2 n + 1] + p[2 n - 1];
Prime[Select[Range[z], a[#] < 0 &]]

Crossrefs

Cf. A000027, A391797, A391801, A391802.

Sequence in context: A040070 A322923 A048523 * A307627 A000922 A107188

Adjacent sequences: A391797 A391798 A391799 * A391801 A391802 A391803

Keyword

nonn

Author

Clark Kimberling, Dec 30 2025

Status

approved