A131387 - OEIS

%I #10 Aug 09 2015 23:38:12

%S 1,1,1,1,2,4,12,48,48,192,2880,2880,25920,552960,3265920,1935360,

%T 116121600,278691840,9405849600,26754416640,94058496000,3210529996800,

%U 869100503040000,423789959577600,927040536576000,135612787064832000

%N Product of the nonzero digital products of n for all the bases 1 to n (a 'total digital-product factorial').

%F a(n)=product{1<=p<=n, dp_p(n)} where dp_p(n) = product of the nonzero digits of n in base p.

%F Cf. A131385, A010786, A007954.

%o (PARI) a(n) = {p = 1; for (b=2, n, digs = digits(n, b); p *= prod(k=1, #digs, if (digs[k], digs[k], 1));); return (p);} \\ _Michel Marcus_, Jul 15 2013

%K nonn,base

%O 1,5

%A _Hieronymus Fischer_, Jul 08 2007