|
%I #17 Jul 31 2023 09:33:32
%S 1,1,1,1,1,1,1,7,8,9,10,11,12,13,91,105,120,136,153,171,190,1330,1540,
%T 1771,2024,2300,2600,2925,20475,23751,27405,31465,35960,40920,46376,
%U 324632,376992,435897,501942,575757,658008,749398,5245786,6096454,7059052,8145060
%N a(n) = binomial(n,floor(n/7)).
%H Seiichi Manyama, <a href="/A062947/b062947.txt">Table of n, a(n) for n = 0..5000</a>
%t Table[Binomial[n,Floor[n/7]],{n,50}] (* _Harvey P. Dale_, Jul 24 2019 *)
%o (PARI) j=[]; for(n=1,75,j=concat(j,binomial(n,floor(n/7)))); j
%Y Cf. A001405, A051036, A051052, A051053.
%K nonn,easy
%O 0,8
%A _Jason Earls_, Jul 21 2001
%E a(0)=1 prepended by _Alois P. Heinz_, Oct 20 2022
|
