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 A376082 #12 Sep 13 2024 08:11:36
%S A376082 1,1,8,3,20,8,16,6,24,20,10,24,28,16,40,12,36,24,18,60,16,10,48,24,
%T A376082 100,28,72,48,14,40,30,24,40,36,80,24,76,18,56,60,40,16,88,30,120,48,
%U A376082 32,24,112,100,72,84,108,72,20,48,72,14,58,120,60,30,48,48,140
%N A376082 a(n) is the period of the Leonardo numbers (A001595) modulo n.
%C A376082 See A376081 for more information.
%H A376082 Paolo Xausa, <a href="/A376082/b376082.txt">Table of n, a(n) for n = 1..10000</a>
%F A376082 Apparently, a(2*k) = A001175(k), for k >= 1.
%t A376082 A376082[n_] := If[n < 3, 1, Module[{k = 1}, NestWhile[Mod[2*Fibonacci[++k] - 1, n] &, 1, {#, #2} != {1, n-1} &, {3, 2}]; k]];
%t A376082 Array[A376082, 100]
%Y A376082 Row lengths of A376081.
%Y A376082 Cf. A001175.
%K A376082 nonn
%O A376082 1,3
%A A376082 _Paolo Xausa_, Sep 10 2024