A173170 a(n) = sin^2((2n-1)*arcsin(sqrt n)) = 1 - sin^2( (2n-1)*arccos(sqrt n)).

0, 1, 50, 23763, 25421764, 48225038405, 142786923879606, 608447515452613207, 3527836867501829594888, 26710782540478226038759689, 255922222218837615280903143610, 3026917140685147530327256796600411

Offset: 0

Author

Artur Jasinski, Feb 11 2010

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..170

Crossrefs

Cf. A132592, A146311, A146312, A146313, A173115, A173116 A173121, A173127, A173128, A173129, A173130, A173131, A173133, A173134, A173148, A173151.

Programs

Mathematica

Table[Round[Sin[(2 n - 1) ArcSin[Sqrt[n]]]^2], {n, 0, 20}] (* Artur Jasinski, Feb 11 2010 *)

Formula

a(n) ~ exp(-1) * 2^(4*n-4) * n^(2*n-1). - Vaclav Kotesovec, Apr 05 2016

Extensions

Minor edits by Vaclav Kotesovec, Apr 05 2016