A221717 Non-cuban primes.

2, 3, 5, 11, 13, 17, 23, 29, 31, 41, 43, 47, 53, 59, 67, 71, 73, 79, 83, 89, 97, 101, 103, 107, 109, 113, 131, 137, 139, 149, 151, 157, 163, 167, 173, 179, 181, 191, 193, 197, 199, 211, 223, 227, 229, 233, 239, 241, 251, 257, 263, 269, 277, 281, 283, 293

Offset: 1

Author

N. J. A. Sloane, Jan 29 2013

Keywords

• nonn

Comments

Primes not in A002407.

Links

• T. D. Noe, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A002407, A007645, A003627.

Programs

Mathematica

nn = 10; c = Select[Table[3 x^2 + 3 x + 1, {x, nn}], PrimeQ[#] &]; Complement[Prime[Range[PrimePi[c[[-1]]]]], c] (* T. D. Noe, Jan 30 2013 *)