login
a(n) = binomial(n, floor(n/3)).
7

%I #24 Jul 31 2023 09:32:49

%S 1,1,1,3,4,5,15,21,28,84,120,165,495,715,1001,3003,4368,6188,18564,

%T 27132,38760,116280,170544,245157,735471,1081575,1562275,4686825,

%U 6906900,10015005,30045015,44352165,64512240,193536720,286097760,417225900,1251677700

%N a(n) = binomial(n, floor(n/3)).

%H Seiichi Manyama, <a href="/A051033/b051033.txt">Table of n, a(n) for n = 0..1000</a>

%p [seq(binomial(n,floor(n/3)), n=0..50)];

%t a[n_] := Binomial[n, Floor[n/3]]; Array[a, 50, 0] (* _Enrique PĂ©rez Herrero_, Mar 06 2012 *)

%Y Cf. A001405, A051036, A051052, A051053, A062947.

%Y Cf. A047193.

%K nonn,easy

%O 0,4

%A _N. J. A. Sloane_