|
%I #15 Apr 18 2020 12:51:03
%S 4,16,36,16,100,100,36,400,36,64,784,3136,4900,3136,784,64,1296,7056,
%T 15876,15876,7056,1296,100,14400,44100,63504,44100,14400,100,108900,
%U 213444,213444,108900,144,4356,48400,627264,853776,627264,48400,4356
%N Squares of even elements in Pascal's triangle A007318.
%H Harvey P. Dale, <a href="/A014727/b014727.txt">Table of n, a(n) for n = 0..1000</a>
%F a(n) = A014428(n)^2. - _Sean A. Irvine_, Nov 18 2018
%t Select[Flatten[Table[Binomial[n,k],{n,0,20},{k,0,n}]],EvenQ]^2 (* _Harvey P. Dale_, Apr 18 2020 *)
%Y Cf. A007318, A014428.
%K nonn,tabf,easy
%O 0,1
%A _Mohammad K. Azarian_
%E More terms from Andrew J. Gacek (andrew(AT)dgi.net)
|
