|
%I #12 Apr 05 2016 08:01:57
%S 0,1,50,23763,25421764,48225038405,142786923879606,608447515452613207,
%T 3527836867501829594888,26710782540478226038759689,
%U 255922222218837615280903143610,3026917140685147530327256796600411
%N a(n) = sin^2((2n-1)*arcsin(sqrt n)) = 1 - sin^2( (2n-1)*arccos(sqrt n)).
%H Vincenzo Librandi, <a href="/A173170/b173170.txt">Table of n, a(n) for n = 0..170</a>
%F a(n) ~ exp(-1) * 2^(4*n-4) * n^(2*n-1). - _Vaclav Kotesovec_, Apr 05 2016
%t Table[Round[Sin[(2 n - 1) ArcSin[Sqrt[n]]]^2], {n, 0, 20}] (* _Artur Jasinski_, Feb 11 2010 *)
%Y Cf. A132592, A146311, A146312, A146313, A173115, A173116 A173121, A173127, A173128, A173129, A173130, A173131, A173133, A173134, A173148, A173151.
%K nonn
%O 0,3
%A _Artur Jasinski_, Feb 11 2010
%E Minor edits by _Vaclav Kotesovec_, Apr 05 2016
|
