This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A065517 #16 Dec 04 2024 15:40:32 %S A065517 1,1,1,1,1,1,1,1,1,10,11,4,13,14,5,16,17,2,19,10,7,11,23,4,25,13,3,14, %T A065517 29,10,31,32,11,34,35,4,37,38,13,10,41,7,43,11,5,23,47,4,49,10,17,52, %U A065517 53,6,11,56,19,58,59,10,61,31,7,32,65,11,67,34,23,10,71 %N A065517 Numerator of n/(sum of the digits of n). %H A065517 Harry J. Smith, <a href="/A065517/b065517.txt">Table of n, a(n) for n = 1..1000</a> %e A065517 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, ... %t A065517 Numerator[#/Total[IntegerDigits[#]]]&/@Range[80] (* _Harvey P. Dale_, Feb 19 2015 *) %o A065517 (PARI) a(n) = numerator(n/sumdigits(n)); \\ _Michel Marcus_, Jun 18 2018 %Y A065517 Cf. A065518, A007954. %K A065517 nonn,base %O A065517 1,10 %A A065517 _N. J. A. Sloane_, Nov 27 2001 %E A065517 Definition corrected by _Harry J. Smith_, Oct 20 2009