|
%I #4 Jul 29 2015 00:45:55
%S 1,2,1,2,1,4,4,4,1,3,1,4,1,3,1,2,10,1,3,37,4,1,37,1,19,1,1,1,1,4,2,1,
%T 2,9,7,1,2,1,1,4,1,10,1,1,62,1,1,3,2,2,3,2,3,2,8,1,8,2,2,2,1,1,1,3,1,
%U 2,1,15,7,1,2,4,6,1,1,1,2,3,263,1,2,1,2,5,10,1,1,1,1,2,1,5,1,2,1,13,1,1,2,1
%N Continued fraction expansion of nested cube root expression in A099874.
%t k = 65; r = 66; While[k > 0, r = (k + r)^(1/3); k-- ]; ContinuedFraction[r, 100] (* _Robert G. Wilson v_, Nov 04 2004 *)
%Y Cf. A099874.
%K cofr,easy,nonn
%O 1,2
%A Mark Hudson (mrmarkhudson(AT)hotmail.com), Nov 02 2004
%E More terms from _Robert G. Wilson v_, Nov 04 2004
|
