cp's OEIS Frontend

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.

A175026 Fibonacci entry points: a(n) = smallest m such that prime(A075702(n)) divides Fibonacci(m).

This page as a plain text file.
%I A175026 #2 Mar 30 2012 17:26:31
%S A175026 432,127,1426,10488,63221,1328,11136,1291186
%N A175026 Fibonacci entry points: a(n) = smallest m such that prime(A075702(n)) divides Fibonacci(m).
%C A175026 In all cases, a(n) is one of divisors of (A075702(n)):
%C A175026 {2160,3048,27094,251712,505768,936240,2182656,2582372}/
%C A175026 {432,127,1426,10488,63221,1328,11136,1291186} = {5,24,19,24,8,705,196,2}.
%C A175026 This is used in Mathematica code for faster search.
%F A175026 a(n)=A001602(A075702(n)).
%e A175026 a(1)=432 because A075702(1)=2160=5*432, prime(2160)=19009, and F(432)/19009= 45104130506533126693784341438185160821786395872599778181861900641867287643757057395776.
%t A175026 s={2160,3048,27094,251712,505768,936240,2182656,2582372};
%t A175026 Do[sk=s[[k]]; dv=Divisors[sk]; i=2; While[Mod[Fibonacci[dvi=dv[[i]]],Prime[sk]]>0,i++ ]; Print[dvi], {k,8}]
%Y A175026 Cf. A001177, A001602, A075702.
%K A175026 nonn
%O A175026 1,1
%A A175026 _Zak Seidov_, Nov 03 2009