login
Even binomial coefficients: C(n,k), 2 <= k <= n-2, sorted, duplicates removed.
1

%I #2 Mar 30 2012 17:31:01

%S 6,10,20,28,36,56,66,70,78,84,120,126,136,190,210,220,252,276,286,300,

%T 330,364,378,406,462,496,528,560,630,666,680,780,792,816,820,924,946,

%U 990,1128,1140,1176,1326,1330,1378,1540,1596,1716,1770,1820,1830,2002

%N Even binomial coefficients: C(n,k), 2 <= k <= n-2, sorted, duplicates removed.

%t Take[ Select[ Union[ Flatten[ Table[ Binomial[n, k], {n, 2, 61}, {k, 2, n - 2}]]], EvenQ[ # ] &], 51]

%Y Cf. A007318, A006987, A047999, A095147.

%K easy,nonn

%O 1,1

%A _Robert G. Wilson v_, May 29 2004