A334140 Numbers that can be written as a product of distinct palindromes.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 14, 15, 16, 18, 20, 21, 22, 24, 27, 28, 30, 32, 33, 35, 36, 40, 42, 44, 45, 48, 54, 55, 56, 60, 63, 64, 66, 70, 72, 77, 80, 84, 88, 90, 96, 99, 101, 105, 108, 110, 111, 112, 120, 121, 126, 131, 132, 135, 140

Offset

1,3

Links

David A. Corneth, Table of n, a(n) for n = 1..10000

Eric Weisstein's World of Mathematics, Palindromic Number

Index entries for sequences related to palindromes

Mathematica

ok[n_, w_: {}] := n <= 1 || AnyTrue[ Divisors@ n, ! MemberQ[w, #] && PalindromeQ[#] && ok[n/#, Append[w, #]] &]; Select[Range[0, 140], ok] (* Giovanni Resta, Apr 15 2020 *)

Crossrefs

Cf. A002113, A033620, A084034, A115683, A140332, A334131.

Sequence in context: A155182 A096076 A108864 * A338883 A055722 A028830

Adjacent sequences: A334137 A334138 A334139 * A334141 A334142 A334143

Keyword

nonn,base

Author

Ilya Gutkovskiy, Apr 15 2020

Status

approved