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.

A121104 a(n) = Fibonacci(n - 1) modulo the n-th prime number.

This page as a plain text file.
%I A121104 #30 Sep 08 2022 08:45:27
%S A121104 1,1,2,3,5,8,13,21,5,24,15,21,18,1,27,43,11,38,63,49,44,32,88,2,83,59,
%T A121104 73,76,79,63,113,9,94,61,6,123,76,149,127,34,74,124,32,83,1,3,91,212,
%U A121104 204,232,85,76,171,141,148,234,145,38,2,271,208,179,194,73,14,127,177
%N A121104 a(n) = Fibonacci(n - 1) modulo the n-th prime number.
%H A121104 Vincenzo Librandi, <a href="/A121104/b121104.txt">Table of n, a(n) for n = 2..5000</a>
%F A121104 a(n) = Fibonacci(n - 1) modulo Prime(n).
%e A121104 a(10)=5 because the 9th Fibonacci=34, the 10th Prime=29, and 34 mod 29=5.
%t A121104 With[{nn=70},Mod[First[#],Last[#]]&/@Thread[{Fibonacci[Range[nn-1]], Prime[ Range[2,nn]]}]] (* _Harvey P. Dale_, Feb 27 2013 *)
%t A121104 Table[Mod[Fibonacci[n - 1], Prime[n]], {n, 2, 70}] (* _Vincenzo Librandi_, Jun 19 2017 *)
%o A121104 (PARI) a(n) = fibonacci(n-1) % prime(n); \\ _Michel Marcus_, Jun 18 2017
%o A121104 (PARI) fibmod(n, m)=((Mod([1, 1; 1, 0], m))^n)[1, 2]
%o A121104 a(n)=lift(fibmod(n-1,prime(n))) \\ _Charles R Greathouse IV_, Jun 19 2017
%o A121104 (Magma) [Fibonacci(n-1) mod NthPrime(n): n in [2..70]]; // _Vincenzo Librandi_, Jun 19 2017
%Y A121104 Cf. A000040, A000045, A072123.
%K A121104 nonn
%O A121104 2,3
%A A121104 _Gil Broussard_, Aug 12 2006