A011853 a(n) = floor( binomial(n,7)/7 ).
0, 0, 0, 0, 0, 0, 0, 0, 1, 5, 17, 47, 113, 245, 490, 919, 1634, 2778, 4546, 7198, 11074, 16611, 24363, 35022, 49443, 68671, 93971, 126861, 169148, 222968, 290828, 375653, 480836, 610292, 768516, 960645
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (8,-28,56,-70,56,-28,7,7,-28,56,-70,56,-28,7,7,-28, 56,-70,56,-28,7,7, -28,56,-70,56,-28,7,7,-28,56, -70,56,-28,7,7,-28,56,-70,56,-28,7,7,-28,56, -70,56,-28,8,-1).
Programs
-
Mathematica
Floor[Binomial[Range[0,40],7]/7] (* Harvey P. Dale, Oct 08 2012 *)
-
PARI
a(n)=binomial(n,7)\7 \\ Charles R Greathouse IV, Sep 28 2015
-
SageMath
[floor(binomial(n,7)/7) for n in range(0,36)] # Zerinvary Lajos, Dec 01 2009