A186098 Primes removed by sieve generating A095117.

2, 7, 23, 31, 41, 53, 61, 137, 157, 193, 233, 241, 257, 283, 293, 311, 397, 439, 479, 499, 523, 557, 593, 647, 883, 1061, 1129, 1213, 1303, 1381, 1429, 1439, 1543, 1601, 1847, 1867, 1877, 1931, 2011, 2063, 2129, 2293, 2333, 2347, 2393, 2477, 2551, 2633, 2677, 2687

Offset

1,1

Comments

Primes not of the form k + primepi(k). [corrected by Michel Marcus, Oct 27 2021]

Links

Bill McEachen, Table of n, a(n) for n = 1..10000

Mathematica

Complement[Prime@ Range@ PrimePi[#], Array[PrimePi[#] + # &, #]] &[2700] (* Michael De Vlieger, Oct 27 2021 *)

Prog

(PARI) genit(maxx=50)={arr=List(); for(n=0, maxx, q=n+prime(n+1); if(ispseudoprime(q), listput(arr, q))); arr} \\ Bill McEachen, Oct 27 2021

Crossrefs

Complement of A076757 in the primes.

Cf. A095117.

Sequence in context: A180537 A042145 A309580 * A040098 A045315 A072935

Adjacent sequences: A186095 A186096 A186097 * A186099 A186100 A186101

Keyword

nonn

Author

Carmine Suriano, Mar 29 2011

Status

approved