A082118 Duplicate of A079344.
0, 1, 1, 2, 3, 5, 0, 5, 5, 2, 7, 1, 0, 1, 1, 2, 3, 5, 0, 5, 5, 2, 7, 1, 0, 1, 1, 2, 3, 5, 0, 5, 5, 2, 7
Offset: 0
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.
a(5) = F(5) mod 4 = 5 mod 4 = 1. a(6) = F(6) mod 4 = 8 mod 4 = 0. a(7) = F(7) mod 4 = 13 mod 4 = 1.
[Fibonacci(n) mod 4: n in [0..100]]; // Vincenzo Librandi, Feb 04 2014
A079343:=n->[0, 1, 1, 2, 3, 1][(n mod 6)+1]: seq(A079343(n), n=0..100); # Wesley Ivan Hurt, Jun 20 2016
PadLeft[{}, 108, {0, 1, 1, 2, 3, 1}] (* Harvey P. Dale, Aug 10 2011 *) Table[Mod[Fibonacci[n], 4], {n, 0, 127}] (* Alonso del Arte, Jul 27 2013 *) LinearRecurrence[{1, -1, 1, -1, 1},{0, 1, 1, 2, 3},105] (* Ray Chandler, Aug 27 2015 *)
for (n=0,100,print1(fibonacci(n)%4","))
PadRight[{0, 1, 1}, 100, {8, 9, 9, 2, 3, 5, 8, 13, 13, 10, 7, 9}] (* Paolo Xausa, Aug 25 2024 *)
[Fibonacci(n) mod 3: n in [0..100]]; // Vincenzo Librandi, Feb 04 2014
Table[Mod[Fibonacci[n], 3], {n, 0, 100}](* Vincenzo Librandi, Feb 04 2014 *) LinearRecurrence[{0, 0, 0, 0, 0, 0, 0, 1},{0, 1, 1, 2, 0, 2, 2, 1},103] (* Ray Chandler, Aug 27 2015 *)
a(n)=fibonacci(n%8)%3 \\ Charles R Greathouse IV, Sep 28 2015
[Fibonacci(n) mod 5: n in [0..100]]; // Vincenzo Librandi, Feb 04 2014
Table[Mod[Fibonacci[n], 5], {n, 0, 125}] (* Alonso del Arte, Jul 29 2013 *)
a(n)=fibonacci(n)%5 \\ Charles R Greathouse IV, Oct 07 2015
[Fibonacci(n) mod 6: n in [0..100]]; // Vincenzo Librandi, Feb 04 2014
Table[Mod[Fibonacci[n], 6], {n, 0, 100}] (* Alonso del Arte, Jul 29 2013 *)
a(n)=fibonacci(n)%6 \\ Charles R Greathouse IV, Oct 07 2016
LinearRecurrence[{1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 1}, {2, 1, 3, 4, 7, 3, 2, 5, 7, 4, 3}, 105] (* Ray Chandler, Aug 27 2015 *) Mod[LucasL[Range[0, 99]], 8] (* Alonso del Arte, Dec 19 2015 *)
a(8) = F(8) mod 16 = 21 mod 16 = 5.
[Fibonacci(n) mod 16: n in [0..100]]; // Vincenzo Librandi, Feb 04 2014
a={};Do[f=Fibonacci[n];AppendTo[a,Mod[f,16]],{n,1,30}];a (* Vladimir Joseph Stephan Orlovsky, Jul 23 2008 *) Table[Mod[Fibonacci[n], 16], {n, 0, 100}] (* Vincenzo Librandi, Feb 04 2014 *)
for (n=1,100,print1(fibonacci(n)%16","))
Comments