A071198 Impossible primes in A071195. These primes are not terminal primes of shortest consecutive prime sequences initiated with n-th prime and providing prime-sum.
2, 5, 7, 19, 43, 53, 59, 67, 83, 101, 103, 109, 163, 179, 181, 191, 193, 199, 229, 233, 241, 257, 263, 271, 277, 313, 337, 347, 367, 373, 431, 433, 449, 467, 491, 499, 521, 541, 547, 571, 587, 607, 613, 619, 643, 659, 683, 701
Offset: 1
Keywords
Links
- Michael De Vlieger, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
Complement[Prime@ Range@ PrimePi@ Last@ #, #] &@ Prime@ Table[k = 1; While[! PrimeQ@ Total@ Prime@ Range[n, n + k], k++]; n + k, {n, 125}] (* Michael De Vlieger, Jul 18 2017 *)