A309957 Product of digits of (n written in base 6).
0, 1, 2, 3, 4, 5, 0, 1, 2, 3, 4, 5, 0, 2, 4, 6, 8, 10, 0, 3, 6, 9, 12, 15, 0, 4, 8, 12, 16, 20, 0, 5, 10, 15, 20, 25, 0, 0, 0, 0, 0, 0, 0, 1, 2, 3, 4, 5, 0, 2, 4, 6, 8, 10, 0, 3, 6, 9, 12, 15, 0, 4, 8, 12, 16, 20, 0, 5, 10, 15, 20, 25, 0, 0, 0, 0, 0, 0, 0, 2, 4, 6, 8, 10, 0, 4, 8, 12, 16, 20, 0, 6, 12, 18, 24, 30, 0, 8, 16, 24, 32
Offset: 0
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..10000
Programs
-
Magma
[0] cat [&*Intseq(n,6):n in [1..100]]; // Marius A. Burtea, Aug 25 2019
-
Maple
seq(convert(convert(n,base,6),`*`),n=0..100); # Robert Israel, Aug 24 2019
-
Mathematica
Table[Times @@ IntegerDigits[n, 6], {n, 0, 100}]
Formula
G.f. A(x) satisfies: A(x) = x * (1 + 2*x + 3*x^2 + 4*x^3 + 5*x^4) * (1 + A(x^6)).