%I A079349
%S A079349 14,18,28,38,40,48,54,60,74,88,98,100,108,108,114,138,138,148,150,158,
%T A079349 174,180,194,198,198,210,228,234,240,258,264,268,278,280,294,308,314,
%U A079349 318,330,338,348,348,354,374,388,398,400,408,420,434,448,458,460
%N A079349 p-(p/5) where Fibonacci{p-(p/5)} is not the first Fibonacci number that 
               p divides.
%e A079349 A079348(1)=13, (13/5)=-1, hence a(1)=14.
%o A079349 (PARI) quad5(x)=if (x%5>1 && x%5<4,-1,1) forprime (p=7,500, wss=p-quad5(p); 
               for (n=1, wss,if (fibonacci(n)%p==0,if (n<wss,print1(wss","); break))))
%Y A079349 Cf. A079346, A079347, A079348.
%Y A079349 Sequence in context: A097324 A051419 A000053 this_sequence A154864 A065343 
               A165228
%Y A079349 Adjacent sequences: A079346 A079347 A079348 this_sequence A079350 A079351 
               A079352
%K A079349 nonn
%O A079349 0,1
%A A079349 Jon Perry (perry(AT)globalnet.co.uk), Jan 04 2003