login
A192141
Palindromic concatenation of prime divisors of numbers from A192140.
4
2, 3, 2, 5, 7, 2, 3, 11, 101, 11, 131, 151, 181, 191, 313, 7, 353, 373, 383, 727, 383, 757, 787, 797, 919, 929, 11, 73137, 101, 10301, 10501, 10601, 11311, 11411, 12421, 12721, 12821, 13331, 13831, 13931, 14341, 11, 14741, 15451, 15551, 16061, 16361, 16561, 16661
OFFSET
1,1
EXAMPLE
a(21) = 383 because A192140(21) = 747 = 3 * 83.
MATHEMATICA
f[n_] := FromDigits[Flatten[IntegerDigits /@ FactorInteger[n][[;; , 1]]]]; f /@ Select[Range[2, 20000], And @@ (PalindromeQ /@ {#, f[#]}) &] (* Amiram Eldar, Aug 06 2024 *)
KEYWORD
nonn,base
AUTHOR
Jaroslav Krizek, Jun 24 2011
EXTENSIONS
More terms from Amiram Eldar, Aug 06 2024
STATUS
approved