%I #10 Apr 01 2020 08:22:19
%S 1,2,1,0,1,2,2,2,1,1,1,2,1,0,1,0,2,1,2,0,0,1,1,0,0,2,2,1,2,1,0,0,2,2,
%T 1,2,2,1,1,1,2,2,2,2,1,1,1,2,1,1,1,0,0,1,2,0,2,0,1,2,0,1,1,1,0,1,1,2,
%U 2,0,1,1,2,2,0,1,2,1,2,1,0,0,0,2,1,1,2,0,1,2
%N Write (n+1)st Fibonacci number in base 3 and juxtapose.
%t Flatten[IntegerDigits[Fibonacci[Range[2,30]],3]] (* _Harvey P. Dale_, Apr 09 2015 *)
%Y Cf. A004686 (Fibonacci numbers written in base 3).
%K nonn,base
%O 1,2
%A _Clark Kimberling_
|