This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A079346 #14 Jun 22 2024 06:22:52 %S A079346 2,3,5,7,11,19,23,31,43,59,67,71,79,83,103,127,131,163,167,179,191, %T A079346 223,227,239,251,271,283,311,359,367,379,383,419,431,439,443,463,467, %U A079346 479,487,491,499,503,523,547,571,587,599,607,631,643,647,659,683,719,727,739,751,787,823,827 %N A079346 Primes p such that F(p-(p/5)) is the first Fibonacci number that p divides. %C A079346 The n-th prime p is in this sequence iff A001602(n) = p-(5/p) (that is the maximum possible value of A001602(n)). %H A079346 Amiram Eldar, <a href="/A079346/b079346.txt">Table of n, a(n) for n = 1..10000</a> %e A079346 7 belongs to this sequence since (7/5) = -1, F(8) = 21 and 7 does not divide F(1) to F(7). %o A079346 (PARI) forprime (p=2,500, wss=p-kronecker(5,p); for(n=1, wss, if( fibonacci(n)%p==0, if( n==wss, print1(p","), break) ) )) %Y A079346 Union of A000057, A106535 and {5}. %Y A079346 Cf. A001602, A079347, A079348, A079349. %K A079346 nonn %O A079346 1,1 %A A079346 _Jon Perry_, Jan 04 2003 %E A079346 Corrected and edited by _Max Alekseyev_, Nov 23 2007