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 A079076 #9 Jul 29 2025 18:06:23
%S A079076 0,0,3,4,65,27,203,236,3489,2845,53471,21341,757913,553973,619181,
%T A079076 1040164,29169263,16276383,193614199,116220883,32925391,10628013,
%U A079076 320160667,455451475,22987116115,19980510667,193553388003,154777722503
%N A079076 Numerator of Sum_{1<k<n, n mod k > 0} n/k.
%F A079076 p divides a(p^k) for prime p and integer k>1. p divides a(p), a(2p) and a(2p^2) for prime p>2. - _Alexander Adamchuk_, Jul 27 2006
%t A079076 f[n_] := Block[{s = 0, d = 1}, While[d < n, If[ Mod[n, d] != 0, s = s + n/d]; d++ ]; s]; Numerator[ Table[ f[n], {n, 1, 28}]]
%Y A079076 Cf. A027611 (denominator), A049820, A024816.
%K A079076 nonn,frac
%O A079076 1,3
%A A079076 _Reinhard Zumkeller_, Dec 21 2002
%E A079076 Edited and extended by _Robert G. Wilson v_, Dec 30 2002