A062947 a(n) = binomial(n,floor(n/7)).

1, 1, 1, 1, 1, 1, 1, 7, 8, 9, 10, 11, 12, 13, 91, 105, 120, 136, 153, 171, 190, 1330, 1540, 1771, 2024, 2300, 2600, 2925, 20475, 23751, 27405, 31465, 35960, 40920, 46376, 324632, 376992, 435897, 501942, 575757, 658008, 749398, 5245786, 6096454, 7059052, 8145060

Offset: 0

Author

Jason Earls, Jul 21 2001

Keywords

• nonn
• easy

Links

• Seiichi Manyama, Table of n, a(n) for n = 0..5000

Crossrefs

Cf. A001405, A051036, A051052, A051053.

Programs

Mathematica

Table[Binomial[n,Floor[n/7]],{n,50}] (* Harvey P. Dale, Jul 24 2019 *)

PARI

j=[]; for(n=1,75,j=concat(j,binomial(n,floor(n/7)))); j

Extensions

a(0)=1 prepended by Alois P. Heinz, Oct 20 2022