login
Denominator of n/(sum of the digits of n).
2

%I #13 Jun 18 2018 03:42:26

%S 1,1,1,1,1,1,1,1,1,1,2,1,4,5,2,7,8,1,10,1,1,2,5,1,7,4,1,5,11,1,4,5,2,

%T 7,8,1,10,11,4,1,5,1,7,2,1,5,11,1,13,1,2,7,8,1,2,11,4,13,14,1,7,4,1,5,

%U 11,2,13,7,5,1,8,1,10,11,4,13,2,5,16,1,1,5,11,1,13

%N Denominator of n/(sum of the digits of n).

%H Harry J. Smith, <a href="/A065518/b065518.txt">Table of n, a(n) for n = 1..1000</a>

%e 1, 1, 1, 1, 1, 1, 1, 1, 1, 10, 11/2, 4, 13/4, 14/5, 5/2, 16/7, 17/8, 2, 19/10, 10, 7, 11/2, ...

%o (PARI) SumD(x)= { local(s=0); while (x>9, s+=x-10*(x\10); x\=10); return(s + x) } { for (n=1, 1000, a=denominator(n/SumD(n)); write("b065518.txt", n, " ", a) ) } \\ _Harry J. Smith_, Oct 20 2009

%o (PARI) a(n) = denominator(n/sumdigits(n)); \\ _Michel Marcus_, Jun 18 2018

%Y Cf. A065517, A007954.

%K nonn,base

%O 1,11

%A _N. J. A. Sloane_, Nov 27 2001

%E Definition corrected by _Harry J. Smith_, Oct 20 2009