|
%I #5 Jan 19 2024 15:03:25
%S 0,1,1,1,3,1,5,3,1,2,85,1,2,2,2,1,1,1,2,5,1,7,1,1,4,1,4,1,1,1,1,6,3,1,
%T 3,3,2,1,9,12,16,4,1,1,1,2,1,2,1,49,3,7,1,2,6,1,1,1,6,1,3,2,1,1,5,2,1,
%U 199,8,1,8,1,1,2,2,1,9,1,4,4,4,2,2,1,2,1,3,1,249,1,2,2,1,1,4,1,1,135,3,2,1
%N Continued fraction expansion of tanh(tanh(1)).
%e While cofrac of tanh(1)={0,1,3,5,7,11,..}, i.e. 0 and odd numbers, twice applying tanh() we get this sequence
%p with(numtheory); cfrac(tanh(tanh(tanh(1))),300,'quotients');
%t ContinuedFraction[Tanh[Tanh[1]],120] (* _Harvey P. Dale_, Jan 19 2024 *)
%Y Cf. A083124, A084304-A084306.
%K cofr,easy,nonn
%O 0,5
%A _Labos Elemer_, Jun 04 2003
|
