# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a323982 Showing 1-1 of 1 %I A323982 #24 Feb 16 2019 12:05:55 %S A323982 1,1,4,0,2,3,8,3,2,1,0,7,6,4,2,8,7,9,2,1,4,1,1,3,1,9,8,0,3,7,9,3,5,0, %T A323982 8,9,0,7,6,6,8,9,7,6,6,7,5,1,1,3,2,0,5,5,0,5,7,7,5,0,9,9,6,9,6,0,1,2, %U A323982 1,3,3,1,6,0,0,3,4,9,0,3,6,8,5,1,3,2,3,4,2,1,6,0,8,8,8,2,7,8,8,7,3,8,8,1,3,3,5,6,1,7,7 %N A323982 Decimal expansion of cosh(Pi/6). %C A323982 Decimal expansion of sum sigma_1 involved in calculation of i^i. [Uhler] %H A323982 Robert G. Wilson v, Table of n, a(n) for n = 1..1000 %H A323982 H. S. Uhler, On the numerical value of i^i, Amer. Math. Monthly, 28 (1921), 114-116. %F A323982 A323982 + A323983 = A323984. %e A323982 1.1402383210764287921411319803793508907668976675113205505775099696012133160034... %t A323982 a[0] = a[1] = 1; a[n_] := ((n - 2)^2 + 1) a[n - 2]; t[x_] := N[(1/2)^x*a[x]/x!, 128]; RealDigits[ Sum[ t[x], {x, 0, 421, 2}], 10, 111][[1]] (* _Robert G. Wilson v_, Feb 16 2019 *) %t A323982 RealDigits[Cosh[Pi/6], 10, 120][[1]] (* _Vaclav Kotesovec_, Feb 16 2019 *) %Y A323982 Cf. A323983, A323984, A323985, A323986, A323987. %K A323982 nonn,cons %O A323982 1,3 %A A323982 _N. J. A. Sloane_, Feb 11 2019 %E A323982 More digits from _Robert G. Wilson v_, Feb 16 2019 %E A323982 Simpler definition from _Vaclav Kotesovec_, Feb 16 2019 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE