|
%I #30 Aug 11 2022 03:41:22
%S 1,24,24,24,120,24,24,24,24,120,120,24,24,24,120,24,24,24,24,120,24,
%T 120,24,24,600,24,24,24,24,120,120,24,120,24,120,24,24,24,24,120,120,
%U 24,120,120,120,24,24,24,24,600,24,24,24,24,120,24,24,24,24,120
%N Fixed point when A001175 (Pisano periods) is iterated with starting value n.
%C Are the powers of 5 (together with 2) the indices of records in this sequence? - _Charles R Greathouse IV_, Aug 11 2022
%H Reinhard Zumkeller, <a href="/A235249/b235249.txt">Table of n, a(n) for n = 1..10000</a>
%H J. D. Fulton and W. L. Morris, <a href="http://matwbn.icm.edu.pl/ksiazki/aa/aa16/aa1621.pdf">On arithmetical functions related to the Fibonacci numbers</a>, Acta Arithmetica, 16 (1969), 105-110.
%H Wikipedia, <a href="http://en.wikipedia.org/wiki/Pisano_period">Pisano period</a>
%F a(n) = 24*5^(A001179(n)-1) for n > 1.
%F A001175(a(n)) = a(n).
%o (Haskell)
%o a235249 n = if y == n then n else a235249 y where y = a001175 n
%Y Cf. A001175, A001179.
%K nonn
%O 1,2
%A _Reinhard Zumkeller_, Jan 15 2014
|
