A218215 Product of the nonzero digits (in base 10) of n^4.

1, 6, 8, 60, 60, 108, 8, 216, 180, 1, 96, 252, 480, 576, 300, 2700, 240, 1512, 18, 6, 1152, 1440, 4032, 2646, 1620, 45360, 240, 4320, 784, 8, 540, 6720, 720, 2916, 300, 13608, 1344, 1440, 288, 60, 6720, 972, 768, 36288, 240, 94080, 96768, 2880, 6720, 60, 2520, 756, 16128, 3600, 2700, 186624, 150, 3888, 252, 108

Offset

1,2

Comments

This is to 4 as A218145 Product of the nonzero digits (in base 10) of n^3, is to 3. Similar to A053668, which does not exclude zero digits from the product. This is to the 4th powers A000583 as cubes A000578 are to A218145, and as A218072 is to the squares A000290.

Links

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

Mathematica

Table[Times @@ Select[IntegerDigits[n^4], # > 0 &], {n, 60}]

Crossrefs

Cf. A000583, A007954, A053668, A218072, A218145.

Sequence in context: A167481 A137122 A272963 * A240544 A136931 A192383

Adjacent sequences: A218212 A218213 A218214 * A218216 A218217 A218218

Keyword

nonn,base,easy

Author

Jonathan Vos Post, Oct 23 2012

Status

approved