A276716 a(n) = A007953(n)*A047726(n).

1, 2, 3, 4, 5, 6, 7, 8, 9, 2, 2, 6, 8, 10, 12, 14, 16, 18, 20, 4, 6, 4, 10, 12, 14, 16, 18, 20, 22, 6, 8, 10, 6, 14, 16, 18, 20, 22, 24, 8, 10, 12, 14, 8, 18, 20, 22, 24, 26, 10, 12, 14, 16, 18, 10, 22, 24, 26, 28, 12, 14, 16, 18, 20, 22, 12, 26, 28, 30, 14, 16, 18, 20, 22, 24, 26, 14, 30, 32, 16

Offset

1,2

Links

Altug Alkan, Table of n, a(n) for n = 1..100000

Prog

(PARI) A047726(n) = n=eval(Vec(Str(n))); (#n)!/prod(i=0, 9, sum(j=1, #n, n[j]==i)!);
A007953(n) = sumdigits(n);
a(n) = A007953(n)*A047726(n);

Crossrefs

Cf. A007953, A045876, A047726.

Sequence in context: A340184 A238986 A227876 * A189506 A173529 A273005

Adjacent sequences: A276713 A276714 A276715 * A276717 A276718 A276719

Keyword

nonn,base,look

Author

Altug Alkan, Sep 17 2016

Status

approved