%I #8 Oct 07 2016 13:08:47
%S 1,2,3,5,1,1,1,6,3,0,4,6,1,0,6,1,5,5,2,6,4,4,5,2,1,0,4,6,1,5,3,1,2,6,
%T 1,0,4,4,4,1,1,0,3,5,1,1,5,1,2,2,2,5,5,0,3,4,3,6,2,5,1,0,2,4,3,1,1,4,
%U 6,3,5,6,2,5,2,1,2,0,4,3,1,5,0,6,1,0,1,3,6,2
%N Write the (n+1)st Fibonacci number in base 7 and juxtapose.
%t Flatten[IntegerDigits[#,7]&/@Fibonacci[Range[2,40]]] (* _Harvey P. Dale_, Jan 21 2013 *)
%K nonn,base
%O 1,2
%A _Clark Kimberling_