A218145 Product of the nonzero digits (in base 10) of n^3.

1, 8, 14, 24, 10, 12, 36, 10, 126, 1, 9, 112, 126, 224, 315, 216, 108, 240, 2160, 8, 108, 192, 84, 192, 300, 1470, 1296, 180, 1728, 14, 1134, 2016, 2835, 324, 2240, 4320, 450, 2240, 1215, 24, 864, 1792, 2205, 1280, 90, 3402, 144, 90, 1512, 10, 180, 192

Offset

1,2

Comments

Similar to A053668, which does not exclude zero digits from the product. This is to the cubes A000578 as A218072 is to the squares A000290.

Links

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

Example

a(4) = A007954(4^3) = product of digits of 64 = 6 * 4 = 24, since none of the digits is 0.
a(10) = product of nonzero digits of 1000 = 1.

Mathematica

Table[Times @@ Select[IntegerDigits[n^3], # > 0 &], {n, 60}] (* T. D. Noe, Oct 22 2012 *)

Crossrefs

Cf. A000578, A007954, A053668, A218072.

Sequence in context: A100508 A325302 A053668 * A250098 A155156 A275898

Adjacent sequences: A218142 A218143 A218144 * A218146 A218147 A218148

Keyword

nonn,base,easy

Author

Jonathan Vos Post, Oct 21 2012

Status

approved