login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

a(n) = Cosh[(2 n - 1) ArcCosh[n]].
9

%I #6 Apr 05 2016 08:39:18

%S 0,1,26,3363,937444,456335045,343904160606,371198523608647,

%T 543466014742175624,1036834190110356583689,2499384905955651114739810,

%U 7429238104512325157021090411,26695718139185294187938997247212

%N a(n) = Cosh[(2 n - 1) ArcCosh[n]].

%F a(n) ~ 2^(2*n-2) * n^(2*n-1). - _Vaclav Kotesovec_, Apr 05 2016

%t Table[Round[Cosh[(2 n - 1) ArcCosh[n]]], {n, 0, 20}] (* _Artur Jasinski_ *)

%Y Cf. A058331, A001079, A037270, A071253, A108741, A132592, A146311, A146312, A146313, A173115, A173116, A173121, A173127, A173128.

%K nonn

%O 0,3

%A _Artur Jasinski_, Feb 10 2010