A046356 Odd numbers with only palindromic prime factors whose sum is palindromic (counted with multiplicity).

9, 15, 27, 45, 121, 495, 735, 875, 1331, 1701, 2025, 2101, 2121, 2525, 2751, 3171, 3275, 3775, 3801, 4525, 5445, 6573, 7413, 7825, 7833, 8043, 8085, 8595, 8767, 8825, 9325, 9575, 9625, 10201, 12005, 13231, 14641, 15251, 15267, 15897, 16527, 17161

Offset

0,1

Links

Table of n, a(n) for n=0..41.

Example

8767 = 11 * 797 -> 11 + 797 = 808 and 808 is a palindrome.

Mathematica

palQ[n_] := Reverse[x=IntegerDigits[n]] == x; Select[Range[9, 17170, 2], !PrimeQ[#] && And@@palQ/@Join[{Total[Times@@@(x=FactorInteger[#])]}, First/@x]&] (* Jayanta Basu, Jun 05 2013 *)

Crossrefs

Cf. A046355, A046357.

Sequence in context: A258813 A046353 A340095 * A248381 A060874 A147511

Adjacent sequences: A046353 A046354 A046355 * A046357 A046358 A046359

Keyword

nonn,base

Author

Patrick De Geest, Jun 15 1998

Status

approved