%I #21 Apr 14 2015 09:10:22
%S 1,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
%T 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,
%U 7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7,7
%N Decimal expansion of 16/9.
%C Cutting the unit square [0,1] x [0,1] into two equal areas with a parabolic curve y = A*x^2 requires A to be 16/9. If you extend this to an arbitrary square [0,s] x [0,s], A = (16/9)*s.
%C Except for the first terms, identical to A186684, A021040 and A010727.
%t RealDigits[16/9, 10, 100][[1]] (* _Vincenzo Librandi_, Mar 24 2015 *)
%o (PARI) x=16/9; for(n=1, 100, d=floor(x); x=(x-d)*10; print1(d,", "))
%Y Cf. A122553.
%K nonn,cons,easy,less
%O 1,2
%A _Derek Orr_, Mar 10 2015
|