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 A123708 #6 Oct 26 2017 23:08:31 %S A123708 1,3,3,4,3,5,3,4,4,7,3,8,3,7,7,4,3,8,3,8,7,7,3,8,4,7,4,8,3,13,3,4,7,7, %T A123708 7,8,3,7,7,8,3,13,3,8,8,7,3,8,4,8,7,8,3,8,7,8,7,7,3,16,3,7,8,4,7,13,3, %U A123708 8,7,15,3,8,3,7,8,8,7,13,3,8,4,7,3,16,7,7,7,8,3,16,7,8,7,7,7,8,3,8,8,8,3,13 %N A123708 a(n) = sum of unsigned elements in row n of triangle A123706. %C A123708 Triangle A123706 is the matrix inverse of triangle A010766, where A010766(n,k) = [n/k]. %H A123708 G. C. Greubel, <a href="/A123708/b123708.txt">Table of n, a(n) for n = 1..1000</a> %t A123708 t[n_, k_] := If[Divisible[n, k], MoebiusMu[n/k], 0] - If[Divisible[n, k + 1], MoebiusMu[n/(k + 1)], 0]; Table[Sum[Abs[t[n, k]], {k, 1, n}], {n, 1, 50}] (* _G. C. Greubel_, Oct 26 2017 *) %o A123708 (PARI) {a(n)=local(M=matrix(n,n,r,c,if(r>=c,floor(r/c)))^-1);sum(k=1,n,abs(M[n,k]))} %Y A123708 Cf. A123706, A123707, A123709; A010766. %K A123708 nonn %O A123708 1,2 %A A123708 _Paul D. Hanna_, Oct 09 2006