login
A363997
Position in A088732 of the n-th prime.
0
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,2
COMMENTS
Every positive integer occurs exactly once.
EXAMPLE
a(7) = 5 because the 7th prime, 19, is the 5th term in A088732.
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 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jul 11 2023
STATUS
approved