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:= n-> (<<0|1>, <1|1>>^(10^n))[1, 2]: seq(a(n), n=0..3);
a:= n-> (<<0|1>, <1|1>>^(8^n))[1, 2]: seq(a(n), n=0..4);
a:= n-> (<<0|1>, <1|1>>^(9^n))[1, 2]: seq(a(n), n=0..4);
a:= n-> (<<0|1>, <1|1>>^(n^4))[1, 2]: seq(a(n), n=0..5);
Fibonacci[Range[0, 5]^4] (* Alonso del Arte, Aug 22 2017 *)
a(n) = fibonacci(n^4) \\ Felix Fröhlich, Aug 22 2017
a:= n-> (<<0|1>, <1|1>>^(n^5))[1, 2]: seq(a(n), n=0..5);
Fibonacci[Range[0,4]^5] (* Harvey P. Dale, Mar 27 2025 *)
a:= n-> (<<0|1>, <1|1>>^(n^6))[1, 2]: seq(a(n), n=0..4);
Table[Fibonacci[n^6],{n,0,3}] (* Harvey P. Dale, Jan 26 2025 *)
[Fibonacci(n^7): n in [0..4]]; // Vincenzo Librandi, Nov 24 2014
a:= n-> (<<0|1>, <1|1>>^(n^7))[1, 2]: seq(a(n), n=0..3);
Table[Fibonacci[n^7], {n, 0, 5}] (* Vincenzo Librandi, Nov 24 2014 *)
a:= n-> (<<0|1>, <1|1>>^(n^n))[1, 2]: seq(a(n), n=0..5);
Table[Fibonacci[n^n],{n,0, 5}] (* Harvey P. Dale, Nov 29 2017 *)
Comments