A384227 Smaller members p of sexy prime pairs (p,p+6) such that both p and p+6 are emirps.

31, 73, 107, 733, 1091, 1097, 1103, 1217, 1223, 1231, 3083, 3163, 3251, 3463, 3911, 7187, 7523, 7643, 7681, 9127, 9221, 9491, 9781, 10061, 10247, 10453, 10853, 10987, 11587, 11777, 11783, 11833, 11897, 11903, 11927, 11933, 11953, 12107, 12113, 12547, 12757

Offset

1,1

Links

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

Mathematica

emirpQ[n_] := emirpQ[n] = n != IntegerReverse[n] && PrimeQ[n] && PrimeQ[IntegerReverse[n]]; Select[Range[13000], emirpQ[#] && emirpQ[# + 6] &] (* Amiram Eldar, Aug 26 2025 *)

Crossrefs

Cf. A006567, A023201.

Sequence in context: A131633 A291554 A084655 * A083988 A070954 A141892

Adjacent sequences: A384224 A384225 A384226 * A384228 A384229 A384230

Keyword

nonn,base

Author

Anonymous, Aug 26 2025

Status

approved