|
%I #6 Jun 07 2015 05:54:29
%S 1,2,3,4,5,6,7,8,9,9090909091,100000000001,1090909090910,
%T 11818181818183,127272727272728,1363636363636365,14545454545454546,
%U 154545454545454547,1636363636363636365,17272727272727272729,181818181818181818183
%N Floor[ (digits n times n) divided by digits (n times 1)].
%e a(3) = 333/111 = 3
%e a(10) = Floor[10101010101010101010/1111111111]=9090909091.
%t Table[Floor[FromDigits[PadRight[{},n*IntegerLength[n],IntegerDigits[ n]]]/ FromDigits[PadRight[{},n,1]]],{n,20}] (* _Harvey P. Dale_, Jun 07 2015 *)
%K base,easy,nonn
%O 1,2
%A _Amarnath Murthy_, Jul 24 2005
%E More terms from _Joshua Zucker_, May 08 2006
|
