A230101 a(n) = product of n and all its nonzero digits.
0, 1, 4, 9, 16, 25, 36, 49, 64, 81, 10, 11, 24, 39, 56, 75, 96, 119, 144, 171, 40, 42, 88, 138, 192, 250, 312, 378, 448, 522, 90, 93, 192, 297, 408, 525, 648, 777, 912, 1053, 160, 164, 336, 516, 704, 900, 1104, 1316, 1536, 1764, 250, 255, 520, 795, 1080, 1375, 1680, 1995, 2320, 2655, 360, 366, 744, 1134, 1536, 1950
Offset: 0
Examples
a(15) = 15*1*5=75
Links
Programs
-
Maple
with transforms; [seq(n*digprod0(n), n=0..200)];
-
Mathematica
Table[n*Times@@Select[IntegerDigits[n],#!=0&],{n,0,70}] (* Harvey P. Dale, May 26 2018 *)
Formula
a(n) = n*A051801.