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 A375523 #13 Aug 30 2024 20:44:11 %S A375523 1,3,11,25,137,49,363,761,7129,80939,83249,1109957,1135697,1159721, %T A375523 2364487,40916999,13865893,267536047,271415923,274943083,6401288429, %U A375523 6475652719,32735212187,33078431987,300680459483,43364113769,1269032646901,1280123549581,40016557117411,3666283538201 %N A375523 a(n) = numerator of Sum_{i=1..n} 1/A171397(i). %C A375523 Suggested by A375805. %H A375523 Alois P. Heinz, <a href="/A375523/b375523.txt">Table of n, a(n) for n = 1..2082</a> %e A375523 The first few sums are 1, 3/2, 11/6, 25/12, 137/60, 49/20, 363/140, 761/280, 7129/2520, 80939/27720, 83249/27720, 1109957/360360, 1135697/360360, 1159721/360360, 2364487/720720, ... %p A375523 b:= n-> (l-> add(l[i]*11^(i-1), i=1..nops(l)))(convert(n,base,10)): %p A375523 g:= proc(n) option remember; `if`(n<1, 0, g(n-1)+1/b(n)) end: %p A375523 a:= n-> numer(g(n)): %p A375523 seq(a(n), n=1..30); # _Alois P. Heinz_, Aug 30 2024 %Y A375523 Cf. A171397, A375805, A375524, A001008/A002805. %K A375523 nonn,frac %O A375523 1,2 %A A375523 _N. J. A. Sloane_, Aug 30 2024