This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A218145 #8 Aug 11 2015 01:10:05 %S A218145 1,8,14,24,10,12,36,10,126,1,9,112,126,224,315,216,108,240,2160,8,108, %T A218145 192,84,192,300,1470,1296,180,1728,14,1134,2016,2835,324,2240,4320, %U A218145 450,2240,1215,24,864,1792,2205,1280,90,3402,144,90,1512,10,180,192 %N A218145 Product of the nonzero digits (in base 10) of n^3. %C A218145 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. %e A218145 a(4) = A007954(4^3) = product of digits of 64 = 6 * 4 = 24, since none of the digits is 0. %e A218145 a(10) = product of nonzero digits of 1000 = 1. %t A218145 Table[Times @@ Select[IntegerDigits[n^3], # > 0 &], {n, 60}] (* _T. D. Noe_, Oct 22 2012 *) %Y A218145 Cf. A000578, A007954, A053668, A218072. %K A218145 nonn,base,easy %O A218145 1,2 %A A218145 _Jonathan Vos Post_, Oct 21 2012