A097453 Primes p of the form p = prime(k) - composite(k) for some k.

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

Links

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

Example

The 10th prime is 29, the 10th composite is 16. 29-16=13 the 5th entry in the table.

Prog

(PARI) primepcomp(n) = { for(x=5, n, y=prime(x)- composite(x); if(isprime(y), print1(y", ")) ) } \ the n-th composite composite(n) = { local(c, x); c=1; x=0; while(c <= n, x++; if(!isprime(x), c++); ); return(x) }

Crossrefs

Sequence in context: A357000 A342421 A319631 * A079125 A146305 A342437

Adjacent sequences: A097450 A097451 A097452 * A097454 A097455 A097456

Keyword

nonn

Author

Cino Hilliard, Aug 23 2004

Extensions

Example corrected by Harvey P. Dale, Aug 21 2019

Status

approved