A334417 a(n) is the palindrome equal to A334416(n) divided by its sum of digits.

1, 1, 1, 1, 1, 1, 1, 1, 1, 4, 2, 7, 4, 3, 4, 7, 5, 4, 6, 7, 8, 9, 7, 55, 22, 11, 55, 22, 55, 22, 55, 55, 33, 55, 55, 55, 55, 44, 55, 55, 55, 55, 505, 88, 66, 202, 262, 77, 121, 88, 99, 181, 151, 121, 101, 88, 505, 424, 181, 121, 151, 181, 131, 343, 202, 181, 141

Offset: 1

Author

Bernard Schott, Apr 29 2020

Keywords

• nonn
• base

Examples

			A334416(10) = 12 whose sum of digits is 3; 12/3 = 4, so a(10) = 4.
		

Links

• Index entries for sequences related to palindromes

Crossrefs

Cf. A007953, A113315, A334416.

Cf. A334375 (similar for primes).

Programs

Mathematica

Select[#/Plus @@ IntegerDigits[#] & /@ Range[3000], PalindromeQ] (* Amiram Eldar, Apr 29 2020 *)

PARI

isok(m) = iferr(my(d=digits(m/sumdigits(m))); d==Vecrev(d), E, 0);
apply(x->x/sumdigits(x), select(x->isok(x), [1..3000])) \\ Michel Marcus, Apr 29 2020

Formula

a(n) = A334416(n) / A007953(A334416(n)).