A046357 Composite palindromes with only palindromic prime factors whose sum is palindromic (counted with multiplicity).

4, 6, 8, 9, 121, 1331, 5445, 10201, 13231, 14641, 15251, 18281, 19291, 31613, 35653, 37673, 38683, 52525, 59895, 1030301, 1336331, 3192913, 8117118, 104060401, 134969431, 286121682, 319464913, 677707776

Offset

1,1

Links

Table of n, a(n) for n=1..28.

Formula

A046355 INTERSECT A002113. - R. J. Mathar, Sep 09 2015

Example

319464913 = 10301 * 31013 and 10301 + 31013 = 41314 and all are palindromic.

Mathematica

palQ[n_]:= Reverse[x=IntegerDigits[n]] == x; t={}; Do[If[!PrimeQ[n] && And@@palQ/@Join[{n, Total[Times@@@(x=FactorInteger[n])]}, First/@x], AppendTo[t, n]], {n, 2, 3.2*10^6}]; t (* Jayanta Basu, Jun 05 2013 *)

Crossrefs

Cf. A046355, A046356.

Sequence in context: A076612 A182775 A046354 * A227947 A144123 A132088

Adjacent sequences: A046354 A046355 A046356 * A046358 A046359 A046360

Keyword

nonn,base

Author

Patrick De Geest, Jun 15 1998

Status

approved