login
A082808
Palindromic primes whose digit permutation yields at least one other palindromic prime.
2
101, 10301, 10501, 17971, 30103, 30703, 30803, 37273, 39293, 70207, 70507, 71917, 73237, 79397, 93239, 97379, 1003001, 1008001, 1028201, 1035301, 1043401, 1055501, 1065601, 1074701, 1082801, 1085801, 1093901, 1153511
OFFSET
1,1
LINKS
EXAMPLE
101 gives 011 = 11, 17971 gives 71917.
MATHEMATICA
oppQ[n_]:=Count[FromDigits/@Permutations[IntegerDigits[n]], _?(PrimeQ[#]&&PalindromeQ[#]&)]>1; Select[Prime[Range[100000]], PalindromeQ[#] && ooppQ[ #]&] (* Harvey P. Dale, Aug 14 2019 *)
CROSSREFS
Cf. A082807.
Sequence in context: A096884 A055474 A071783 * A100027 A097727 A083981
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy and Meenakshi Srikanth (menakan_s(AT)yahoo.com), Apr 20 2003
EXTENSIONS
Corrected and extended by Giovanni Resta, Feb 07 2006
STATUS
approved