|
%I #12 Jun 22 2024 09:57:52
%S 13,17,29,37,41,47,53,61,73,89,97,101,107,109,113,137,139,149,151,157,
%T 173,181,193,197,199,211,229,233,241,257,263,269,277,281,293,307,313,
%U 317,331,337,347,349,353,373,389,397,401,409,421,433,449,457,461
%N Fibonacci{p-(p/5)} is the not the first Fibonacci number that p divides.
%H Amiram Eldar, <a href="/A079348/b079348.txt">Table of n, a(n) for n = 1..10000</a>
%e a(1) = 13 as (13/5) = -1, F(14) = 377 = 13 * 29, however F(7) = 13.
%o (PARI) quad5(x)=if (x%5>1 && x%5<4,-1,1);
%o forprime (p=7,500, wss=p-quad5(p); for (n=1, wss,if (fibonacci(n)%p==0,if (n<wss,print1(p","); break))))
%Y Cf. A079346, A079347, A079349.
%K nonn
%O 1,1
%A _Jon Perry_, Jan 04 2003
%E Offset corrected by _Amiram Eldar_, Jun 22 2024
|
