login
A097453
Primes in A014237 in the order of their appearance.
0
2, 3, 5, 5, 13, 13, 17, 23, 41, 41, 61, 67, 67, 89, 109, 131, 131, 157, 163, 167, 167, 181, 191, 191, 199, 199, 227, 263, 269, 281, 367, 409, 433, 433, 457, 467, 503, 503, 569, 593, 617, 641, 709, 761, 811, 839, 859, 859, 883, 887, 1019, 1033, 1033, 1117, 1193
OFFSET
1,1
EXAMPLE
The 10th prime is 29, the 10th composite is 16. 29-16=13 the 5th entry in the table.
PROG
(PARI) composite(n) = { local(c, x); c=1; x=0; while(c <= n, x++; if(!isprime(x), c++); ); return(x) } \\ the n-th composite
primepcomp(n) = { for(x=5, n, y=prime(x)- composite(x); if(isprime(y), print1(y", ")) ) }
CROSSREFS
Cf. A014237.
Sequence in context: A357000 A342421 A319631 * A079125 A146305 A342437
KEYWORD
nonn
AUTHOR
Cino Hilliard, Aug 23 2004
EXTENSIONS
Example corrected by Harvey P. Dale, Aug 21 2019
STATUS
approved