A358529 Indices of the primes in A358528.

3, 5, 7, 9, 10, 12, 15, 16, 19, 22, 24, 25, 28, 30, 31, 33, 35, 37, 40, 43, 45, 47, 51, 52, 54, 59, 62, 63, 66, 67, 69, 71, 72, 73, 77, 78, 80, 81, 83, 85, 87, 88, 91, 92, 95, 97, 98, 100, 102, 106, 107, 111, 115, 118, 119, 122, 124, 125, 126, 128, 133, 136

Offset: 1

Author

Clark Kimberling, Nov 21 2022

Keywords

• nonn
• easy

Comments

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

Examples

			  n      1   2   3   4   5   6   7
  k      3   5   7   9  10  12  15
  p(n)   5  11  17  23  29  37  47
		

Crossrefs

Cf. A358528, A358530, A358531, A181424, A356347.

Programs

Mathematica

t = Select[2 + Range[140],
Prime[#] - Prime[# - 1] > Prime[# - 1] - Prime[# - 2] &]  (* A358529 *)
Prime[t]  (* A358528 *)

Formula

a(n) = A233671(n) + 1.