A143260 Primes that are not emirps.

2, 3, 5, 7, 11, 19, 23, 29, 41, 43, 47, 53, 59, 61, 67, 83, 89, 101, 103, 109, 127, 131, 137, 139, 151, 163, 173, 181, 191, 193, 197, 211, 223, 227, 229, 233, 239, 241, 251, 257, 263, 269, 271, 277, 281, 283, 293, 307, 313, 317, 331, 349, 353, 367, 373, 379, 383

Offset: 1

Author

Lekraj Beedassy, Aug 02 2008

Keywords

• nonn
• base

Comments

Complement of A006567 with respect to A000040.

Programs

Mathematica

Select[Prime[Range[100]],PalindromeQ[#]||!PrimeQ[IntegerReverse[#]]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 29 2017 *)