|
%I #7 Apr 26 2015 11:12:00
%S 111111111111111111111111111111111111111111111111111,110011,1220,303,
%T 201,123,102,63,56,51,47,43
%N a(n) = 51 written in base n.
%C The next term contains a non-decimal digit.
%t Flatten[Join[{FromDigits[PadRight[{},51,1]],Table[FromDigits[ IntegerDigits[ 51,n]],{n,2,12}]}]] (* _Harvey P. Dale_, Apr 26 2015 *)
%K nonn
%O 1,1
%A _N. J. A. Sloane_, Jun 04 2004
|
