login
a(n) = Fibonacci(n) mod 60.
4

%I #12 Jan 22 2022 16:26:29

%S 0,1,1,2,3,5,8,13,21,34,55,29,24,53,17,10,27,37,4,41,45,26,11,37,48,

%T 25,13,38,51,29,20,49,9,58,7,5,12,17,29,46,15,1,16,17,33,50,23,13,36,

%U 49,25,14,39,53,32,25,57,22,19,41,0,41,41,22,3,25,28,53

%N a(n) = Fibonacci(n) mod 60.

%C a(n) = A261575(n,0).

%C Periodic with period length 120. - _Ray Chandler_, Sep 23 2015

%H Reinhard Zumkeller, <a href="/A261606/b261606.txt">Table of n, a(n) for n = 0..10000</a>

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Sexagesimal.html">Sexagesimal</a>

%H Wikipedia, <a href="http://www.wikipedia.org/wiki/Sexagesimal">Sexagesimal</a>

%F a(0) = 0, a(1) = 1 and for n > 1: a(n) = (a(n-1) + a(n-2)) mod 60.

%t Mod[Fibonacci[Range[67]], 60] (* _Michael De Vlieger_, Jan 22 2022 *)

%o (Haskell)

%o a261606 n = a261606_list !! n

%o a261606_list = 0 : 1 : map (flip mod 60)

%o (zipWith (+) a261606_list $ tail a261606_list)

%o (PARI) a(n) = fibonacci(n) % 60; \\ _Michel Marcus_, Jan 22 2022

%Y Cf. A000045, A261575, A261607, A003893.

%K nonn,base

%O 0,4

%A _Reinhard Zumkeller_, Sep 09 2015