login
A192138
Palindromic concatenation of prime divisors of numbers from A192137.
4
2, 3, 2, 5, 7, 2, 3, 11, 2, 5, 3, 2, 313, 7, 2, 323, 3, 101, 313, 717, 11, 5, 2, 343, 131, 151, 353, 181, 191, 323, 373, 3, 383, 2, 737, 313, 747, 3113, 7, 313, 353, 373, 383, 343, 1331, 31113, 767, 353, 313, 2, 323, 5, 373, 3223, 797, 727, 3, 383, 757, 787, 3553
OFFSET
1,1
EXAMPLE
a(13) = 313 because A192137(13) = 39 = 3 * 13.
MATHEMATICA
f[n_] := FromDigits[Flatten[IntegerDigits /@ FactorInteger[n][[;; , 1]]]]; Select[f /@ Range[2, 1900], PalindromeQ] (* 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