A327687 Partial sums of Pisano periods (A001175).

1, 4, 12, 18, 38, 62, 78, 90, 114, 174, 184, 208, 236, 284, 324, 348, 384, 408, 426, 486, 502, 532, 580, 604, 704, 788, 860, 908, 922, 1042, 1072, 1120, 1160, 1196, 1276, 1300, 1376, 1394, 1450, 1510, 1550, 1598, 1686, 1716, 1836, 1884, 1916, 1940, 2052, 2352, 2424, 2508, 2616, 2688, 2708

Offset

1,2

Links

Robert Bilinski, Table of n, a(n) for n = 1..10000

Joseph Louis de Lagrange, Additions aux éléments d'algèbre d'Euler. Analyse indéterminée, (1774), pp. 143ff.

J. D. Fulton and W. L. Morris, On arithmetical functions related to the Fibonacci numbers, Acta Arithmetica 16 (1969), 105-110.

James Grime and Brady Haran, Fibonacci Mystery, Numberphile video, 2013.

Mathematica

Module[{nn=1000, fibs}, fibs=Fibonacci[Range[nn]]; Accumulate[Table[Length[ FindTransientRepeat[ Mod[fibs, n], 2][[2]]], {n, 70}]]] (* Harvey P. Dale, Jul 08 2023 *)

Crossrefs

Cf. A001175.

Sequence in context: A008120 A301163 A301133 * A307623 A307624 A177833

Adjacent sequences: A327684 A327685 A327686 * A327688 A327689 A327690

Keyword

nonn

Author

Robert Bilinski, Sep 22 2019

Status

approved