|
%I #9 Jan 05 2019 18:07:23
%S 1,10,500,166666,416665000,8333300000000,1388883333333333333,
%T 1984119047619047618571428,24801488095238095232142850000000,
%U 2755720899470899470238094444444444444444,2755720899470899470238094444444444444444000000000,25052008177008177002164494949494949494945454545454545454545
%N a(1) = 1, a(n+1) = floor(a(n)*10^n/n).
%t nxt[{n_,a_}]:={n+1,Floor[(a*10^n)/n]}; NestList[nxt,{1,1},15][[All,2]] (* _Harvey P. Dale_, Jan 05 2019 *)
%K nonn
%O 1,2
%A _Amarnath Murthy_, Jun 11 2004
%E More terms from _N. J. A. Sloane_ and _Stefan Steinerberger_, Mar 25 2006
|
