A218311 Product of the nonzero digits (in base 10) of n^5.
1, 36, 576, 64, 900, 4235364, 112896, 4064256, 2624400, 1, 900, 9437184, 1285956, 45158400, 1093955625, 45158400, 101606400, 19110297600, 740710656, 36, 16384, 7290000, 241864704, 1316818944, 12859560000, 65028096, 585252864, 4064256, 129600, 576, 74649600
Offset: 1
Examples
a(3) = 36 because 3^5 = 243, and 2*4*3 = 36.
Programs
-
Mathematica
Table[Times @@ Select[IntegerDigits[n^5], # > 0 &], {n, 60}]
Comments