A095146 Even binomial coefficients: C(n,k), 2 <= k <= n-2, sorted, duplicates removed.
6, 10, 20, 28, 36, 56, 66, 70, 78, 84, 120, 126, 136, 190, 210, 220, 252, 276, 286, 300, 330, 364, 378, 406, 462, 496, 528, 560, 630, 666, 680, 780, 792, 816, 820, 924, 946, 990, 1128, 1140, 1176, 1326, 1330, 1378, 1540, 1596, 1716, 1770, 1820, 1830, 2002
Offset: 1
Programs
-
Mathematica
Take[ Select[ Union[ Flatten[ Table[ Binomial[n, k], {n, 2, 61}, {k, 2, n - 2}]]], EvenQ[ # ] &], 51]