A090273 Numbers with a palindromic digital product.

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 30, 31, 32, 33, 40, 41, 42, 50, 51, 60, 61, 70, 71, 80, 81, 90, 91, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122

Offset

1,3

Comments

A046510 is a subsequence.

A046510 (numbers with digital product < 10) is a subsequence of this sequence. 777 is the first member of this sequence that is not in A046510. - David Wasserman, Oct 24 2005

Links

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

Mathematica

pdpQ[n_]:=Module[{idpn=IntegerDigits[Times@@IntegerDigits[n]]}, idpn == Reverse[idpn]]; Select[Range[0, 150], pdpQ] (* Harvey P. Dale, Oct 01 2013 *)

Crossrefs

Cf. A007954, A046510, A090274.

Sequence in context: A246098 A050608 A260424 * A135381 A135382 A351831

Adjacent sequences: A090270 A090271 A090272 * A090274 A090275 A090276

Keyword

base,easy,nonn

Author

Amarnath Murthy, Nov 28 2003

Extensions

More terms from David Wasserman, Oct 24 2005

Offset changed by Andrew Howroyd, Sep 17 2024

Status

approved