|
%I #5 Mar 30 2012 17:31:01
%S 15,21,35,45,55,91,105,153,165,171,231,253,325,351,435,455,465,495,
%T 561,595,703,715,741,861,903,969,1001,1035,1081,1225,1275,1287,1365,
%U 1431,1485,1653,1711,1771,1891,1953,2145,2211,2415,2485,2701,2775,2925,3003
%N Odd binomial coefficients: C(n,k), 2 <= k <= n-2, sorted, duplicates removed.
%H T. D. Noe, <a href="/A095147/b095147.txt">Table of n, a(n) for n=1..1000</a>
%t Take[ Select[ Union[ Flatten[ Table[ Binomial[n, k], {n, 2, 75}, {k, 2, n - 2}]]], OddQ[ # ] &], 48]
%Y Cf. A007318, A006987, A047999, A095146.
%K easy,nonn
%O 1,1
%A _Robert G. Wilson v_, May 29 2004
|
