A363997 Position in A088732 of the n-th prime.

1, 2, 3, 4, 6, 7, 9, 5, 10, 8, 12, 15, 16, 19, 14, 21, 11, 22, 24, 18, 27, 20, 30, 31, 17, 34, 36, 37, 40, 28, 42, 45, 49, 51, 13, 26, 52, 54, 55, 38, 57, 32, 64, 33, 44, 66, 23, 46, 69, 35, 70, 25, 50, 75, 76, 79, 41, 82, 56, 84, 29, 58, 87, 60, 90, 91, 48

Offset: 1

Author

Clark Kimberling, Jul 11 2023

Keywords

• nonn

Comments

Every positive integer occurs exactly once.

Examples

			a(7) = 5 because the 7th prime, 19, is the 5th term in A088732.
		

Crossrefs

Cf. A000040, A088732, A038780, A363998.

Programs

Mathematica

z= 200; t = Table[k = 1; While[p = n + k*(n + 1); ! PrimeQ[p], k++];
  p, {n, 0, z}];   (* A088732, after Frank M Jackson *)
Flatten[Table[Position[t, Prime[n]], {n, 1, z}]]  (* this sequence *)