A192138 Palindromic concatenation of prime divisors of numbers from A192137.

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

Author

Jaroslav Krizek, Jun 24 2011

Keywords

• nonn
• base

Examples

			a(13) = 313 because A192137(13) = 39 = 3 * 13.
		

Crossrefs

Cf. A002113, A002385, A084317, A084092, A192137, A192139, A192140, A192141.

Programs

Mathematica

f[n_] := FromDigits[Flatten[IntegerDigits /@ FactorInteger[n][[;; , 1]]]]; Select[f /@ Range[2, 1900], PalindromeQ] (* Amiram Eldar, Aug 06 2024 *)

Extensions

More terms from Amiram Eldar, Aug 06 2024