A098736 a(n) = product of n and all its digits.

0, 1, 4, 9, 16, 25, 36, 49, 64, 81, 0, 11, 24, 39, 56, 75, 96, 119, 144, 171, 0, 42, 88, 138, 192, 250, 312, 378, 448, 522, 0, 93, 192, 297, 408, 525, 648, 777, 912, 1053, 0, 164, 336, 516, 704, 900, 1104, 1316, 1536, 1764, 0, 255, 520, 795, 1080, 1375, 1680, 1995

Offset

0,3

Links

Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Index entries for Colombian or self numbers and related sequences

Formula

If n=abcd (say) in decimal, then a(n) = abcd * a * b * c * d.

a(n) = n*A007954(n). - R. J. Mathar, Sep 27 2013

Example

a(15) = 15*1*5=75

Maple

with transforms; [seq(n*digprod(n), n=0..200)]; # N. J. A. Sloane, Oct 12 2013

Mathematica

Array[# Times@@ IntegerDigits@#&, 60, 0] (* Vincenzo Librandi, Oct 13 2013 *)

Prog

(PARI) a(n) = vecprod(digits(n))*n; \\ Michel Marcus, Aug 06 2020

Crossrefs

Cf. A007954, A230101.

Sequence in context: A085942 A066308 A063462 * A002015 A257587 A257588

Adjacent sequences: A098733 A098734 A098735 * A098737 A098738 A098739

Keyword

base,easy,nonn

Author

Alexandre Wajnberg, Sep 30 2004

Extensions

More terms from Sam Alexander, Jan 06 2005

Corrected by Vincenzo Librandi, Oct 13 2013

Status

approved