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 A126083 #18 Apr 04 2022 09:07:47
%S A126083 0,1,2,1,2,1,6,1,1,1,1,5,4,3,2,15,5,13,11,15,11,13,8,19,17,3,23,19,1,
%T A126083 7,20,15,13,33,19,25,17,9,28,13,20,35,27,35,22,43,28,23,17,9,20,7,29,
%U A126083 17,19,53,53,15,7,31,46,7,34,27,24,7,11,47,11,13,42,61,56,25,58,9,66,29,44
%N A126083 a(n) = numerator of H(n) taken mod n, where H(n) = Sum_{k=1..n} 1/k is the n-th harmonic number.
%H A126083 T. D. Noe, <a href="/A126083/b126083.txt">Table of n, a(n) for n=1..10000</a>
%t A126083 seq = {}; s = 0; Do[s += 1/n; AppendTo[seq, Mod[Numerator[s], n]], {n, 1, 79}]; seq (* _Amiram Eldar_, Dec 01 2020 *)
%t A126083 Table[Mod[Numerator[HarmonicNumber[n]],n],{n,80}] (* _Harvey P. Dale_, Apr 04 2022 *)
%Y A126083 Cf. A001008.
%K A126083 nonn
%O A126083 1,3
%A A126083 _Leroy Quet_, Mar 02 2007
%E A126083 More terms from _Max Alekseyev_, Mar 06 2007