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 A376083 #11 Sep 13 2024 08:11:46 %S A376083 0,1,7,5,40,22,47,18,93,100,45,132,180,110,275,84,304,210,134,580,131, %T A376083 78,527,240,1200,388,927,652,160,590,373,328,587,644,1355,444,1404, %U A376083 286,1075,1140,821,278,1847,542,2625,1102,767,504,2681,2500,1815,2204,2860 %N A376083 Row sums of A376081. %C A376083 See A376081 for more information. %H A376083 Paolo Xausa, <a href="/A376083/b376083.txt">Table of n, a(n) for n = 1..10000</a> %F A376083 a(n) = Sum_{k = 0..A376082(n)-1} A376081(n,k). %t A376083 A376081row[n_] := If[n < 3, {n - 1}, Module[{k = 1}, NestWhileList[Mod[2 * Fibonacci[++k] - 1, n] &, 1, {#, #2} != {1, n-1} &, {3, 2}]]]; %t A376083 Array[Total[A376081row[#]] &, 100] %Y A376083 Cf. A214300, A376081. %K A376083 nonn %O A376083 1,3 %A A376083 _Paolo Xausa_, Sep 10 2024