A356347 Indices of the primes in A181424.

4, 17, 38, 41, 48, 56, 57, 75, 104, 109, 112, 120, 131, 162, 166, 186, 189, 196, 201, 220, 241, 273, 274, 293, 341, 360, 389, 421, 428, 466, 467, 510, 522, 555, 601, 607, 623, 631, 635, 669, 684, 685, 704, 711, 712, 735, 763, 793, 815, 823, 824, 831, 832

Offset

1,1

Comments

This sequence, together with A358529 and A358531, partition the set of positive integers >= 3.

Links

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

Formula

a(n) = A064113(n) + 2.

Example

  n     1    2    3    4    5    6   7
  k     4   17   38   41   48   56  57
  p(n)  7   59  163  179  223  263 269

Mathematica

t = Select[2 + Range[1440],
Prime[#] - Prime[# - 1] == Prime[# - 1] - Prime[# - 2] &]  (* A356347 *)
Prime[t]  (* A181424 *)

Crossrefs

Cf. A064113, A358528, A358529, A358530, A358531, A181424.

Sequence in context: A273683 A173511 A218925 * A182868 A178947 A041859

Adjacent sequences: A356344 A356345 A356346 * A356348 A356349 A356350

Keyword

nonn,easy

Author

Clark Kimberling, Nov 21 2022

Status

approved