%I #18 May 14 2019 21:33:48
%S 3,5,0,7,7,6,7,9,4,7,9,5,2,3,7,5,8,1,5,5,8,1,1,6,7,5,0,5,7,2,8,2,0,1,
%T 7,1,1,0,3,8,5,7,2,3,8,9,2,2,5,4,9,7,9,7,6,4,3,9,9,4,8,4,2,1,4,8,4,7,
%U 2,6,5,0,7,8,7,0,9,7,9,0,9,0,8,9,3,4,4,0,1,1,0,7,4,1,8,8,7,3,1,1,5,0,8,1,2,7,9,2,4,2,2,5,0,1,4,1,6,3,2,8,6,2
%N Decimal expansion of cos(1)/(1+cos(1)).
%C By the Lindemann-Weierstrass theorem, this constant is transcendental. - _Charles R Greathouse IV_, May 13 2019
%H Alois P. Heinz, <a href="/A222480/b222480.txt">Table of n, a(n) for n = 0..10000</a>
%H <a href="/index/Tra#transcendental">Index entries for transcendental numbers</a>
%F cos(1)/(1+cos(1)) = 1/(1+1/cos(1)) = 1/(1+sec(1)).
%e 0.35077679479523758155811675...
%p s:= convert(evalf(1/(1+1/cos(1)), 140), string):
%p seq(parse(s[n+2]), n=0..122);
%o (PARI) 1/(1+1/cos(1)) \\ _Charles R Greathouse IV_, May 13 2019
%Y Cf. A222481 (continued fraction), A222482 (Engel expansion), A049470 (cos(1)), A073448 (1/cos(1)).
%K nonn,cons
%O 0,1
%A _Alois P. Heinz_, Feb 21 2013
|