login
A345869
Palindromic primes having at least one different anagram that is also a palindromic prime.
1
17971, 37273, 39293, 71917, 73237, 79397, 93239, 97379, 1028201, 1074701, 1082801, 1085801, 1093901, 1153511, 1175711, 1178711, 1190911, 1208021, 1242421, 1250521, 1268621, 1280821, 1286821, 1303031, 1327231, 1328231, 1335331, 1360631, 1363631
OFFSET
1,1
EXAMPLE
17971 and its anagram 71917 are both palindromic primes, so they are in the sequence.
MATHEMATICA
myQ[n_]:=Select[FromDigits/@Permutations[IntegerDigits[n]],
#!=n&&IntegerLength[n]==IntegerLength[#]&&PalindromeQ[#]&&PrimeQ[#]&]!={};
pp=Cases[Import["https://oeis.org/A002385/b002385.txt", "Table"], {_, _}][[All, 2]]; Select[Table[pp[[i]], {i, 1, 200}], myQ[#]&]
CROSSREFS
Cf. A002385.
Sequence in context: A205950 A205461 A374309 * A345585 A345842 A031641
KEYWORD
nonn,base
AUTHOR
Ivan N. Ianakiev, Jun 27 2021
STATUS
approved