A065518 Denominator of n/(sum of the digits of n).

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, 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, 11, 2, 13, 7, 5, 1, 8, 1, 10, 11, 4, 13, 2, 5, 16, 1, 1, 5, 11, 1, 13

Offset

1,11

Links

Harry J. Smith, Table of n, a(n) for n = 1..1000

Example

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, ...

Prog

(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
(PARI) a(n) = denominator(n/sumdigits(n)); \\ Michel Marcus, Jun 18 2018

Crossrefs

Cf. A065517, A007954.

Sequence in context: A078606 A348706 A343250 * A072012 A172500 A330355

Adjacent sequences: A065515 A065516 A065517 * A065519 A065520 A065521

Keyword

nonn,base

Author

N. J. A. Sloane, Nov 27 2001

Extensions

Definition corrected by Harry J. Smith, Oct 20 2009

Status

approved