A046359 Odd numbers divisible by the palindromic sum of their prime factors (counted with multiplicity).

27, 627, 3861, 4543, 5445, 7881, 8085, 18711, 21091, 22275, 23463, 25575, 33495, 36729, 39875, 49335, 53295, 60297, 69575, 77319, 79475, 95095, 113135, 120835, 126665, 129129, 134343, 142191, 152163, 162393, 166383, 166419, 169275, 175545

Offset

1,1

Links

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

Example

60297 = 3 * 101 * 199 -> Sum of factors is palindrome 303 -> 60297 / 303 = 199 exactly.

Mathematica

palQ[n_]:= Reverse[x=IntegerDigits[n]] == x; Select[Range[9, 175549, 2], !PrimeQ[#] && palQ[y=Total[Times@@@FactorInteger[#]]] && IntegerQ[#/y]&] (* Jayanta Basu, Jun 05 2013 *)

Crossrefs

Cf. A046358, A046360.

Sequence in context: A212670 A099753 A231292 * A223500 A060603 A116988

Adjacent sequences: A046356 A046357 A046358 * A046360 A046361 A046362

Keyword

nonn,base

Author

Patrick De Geest, Jun 15 1998

Extensions

Offset 1 from Michel Marcus, Oct 18 2019

Status

approved