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.

A144288 Fibonacci rabbit sequence number n coded in base n, also diagonal of A144287.

This page as a plain text file.
%I A144288 #12 Jul 23 2017 20:28:45
%S A144288 1,2,10,276,81901,2247615258,81658169024988865,
%T A144288 644986443956439734064225751112,
%U A144288 3427833941153173630835645403655873661712817810325122
%N A144288 Fibonacci rabbit sequence number n coded in base n, also diagonal of A144287.
%H A144288 Alois P. Heinz, <a href="/A144288/b144288.txt">Table of n, a(n) for n = 1..14</a>
%F A144288 See program.
%p A144288 f:= proc(n, b) option remember; `if`(n<2, [n, n], [f(n-1, b)[1] *b^f(n-1, b)[2] +f(n-2, b)[1], f(n-1, b)[2] +f(n-2, b)[2]]) end: a:= n-> f(n, n)[1]: seq(a(n), n=1..11);
%t A144288 f[n_, b_] := f[n, b] = If[n < 2, {n, n}, {f[n-1, b][[1]]*b^f[n-1, b][[2]] + f[n-2, b][[1]], f[n-1, b][[2]] + f[n-2, b][[2]]}]; a[n_] := f[n, n][[1]]; Table[a[n], {n, 1, 9}] (* _Jean-François Alcover_, Jan 03 2013, translated from Maple *)
%Y A144288 Cf. A000045, A005203, A005205, A061107, A036299, A144287.
%K A144288 base,nice,nonn
%O A144288 1,2
%A A144288 _Alois P. Heinz_, Sep 17 2008