This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A173133 #10 Apr 05 2016 08:47:14 %S A173133 0,1,38,4443,1166876,546365045,400680904674,423859315570607, %T A173133 611038907405197432,1151555487914640463209,2748476184146759127540190, %U A173133 8102732939160371170806346243,28915133156938367486730067779348 %N A173133 a(n) = Sinh[(2n-1) ArcSinh[n]]. %F A173133 a(n) = 1/2 (n - sqrt(1 + n^2))^(2 n - 1) + 1/2 (n + sqrt(1 + n^2))^(2 n - 1). - _Artur Jasinski_, Feb 14 2010 %t A173133 Table[Round[Sinh[(2 n - 1) ArcSinh[n]]], {n, 0, 20}] (* _Artur Jasinski_ *) %t A173133 Round[Table[1/2 (n - Sqrt[1 + n^2])^(2 n - 1) + 1/2 (n + Sqrt[1 + n^2])^(2 n - 1), {n, 0, 10}]] (* _Artur Jasinski_, Feb 14 2010 *) %Y A173133 Cf. A058331, A001079, A037270, A071253, A108741, A132592, A146311, A146312, A146313, A173115, A173116, A173121, A173127, A173128, A173129, A173130, A173131. %K A173133 nonn %O A173133 0,3 %A A173133 _Artur Jasinski_, Feb 10 2010 %E A173133 Minor edits by _Vaclav Kotesovec_, Apr 05 2016