|
%I #4 Oct 25 2018 20:46:19
%S 0,1,7,50,2457,842801,14164958864,81658169024988865,
%T 7911779188478711198209076919,
%U 4419091543264985265125879423229594334610523298,239147782774557159658813554446871692442583155391399547503168277134702036921
%N Fibonacci rabbit sequence number n coded in base seven.
%H Alois P. Heinz, <a href="/A320989/b320989.txt">Table of n, a(n) for n = 0..15</a>
%p b:= proc(n) option remember; `if`(n<2, [n$2], [b(n-1)[1]*
%p 7^b(n-1)[2]+b(n-2)[1], b(n-1)[2]+b(n-2)[2]])
%p end:
%p a:= n-> b(n)[1]:
%p seq(a(n), n=0..11);
%Y Column k=7 of A144287.
%K nonn
%O 0,3
%A _Alois P. Heinz_, Oct 25 2018
| 