%I #21 May 19 2018 18:55:36
%S 0,0,1,3,5,8,11,15,19,24,29,34,41,47,54,62,70,79,88,98,108,119,130,
%T 141,154,166,179,193,207,222,237,253,269,286,303,320,339,357,376,396,
%U 416,437,458,480,502
%N Integer part of ((2nd elementary symmetric function of 1,2,...,n)/(1+2+...+n)).
%H Ivan Neretin, <a href="/A024169/b024169.txt">Table of n, a(n) for n = 1..10000</a>
%F From _R. J. Mathar_, Sep 15 2009: (Start)
%F a(n) = floor( A000914(n-1)/A000217(n)).
%F G.f.: x^3*(-1-x-x^5-2*x^7+x^4+x^8)/((x^2+1) * (1+x+x^2) * (x^4-x^2+1) * (x-1)^3). (End)
%F a(n) = floor((1/12)*(n - 1)*(3*n + 2)). - _Ivan Neretin_, May 19 2018
%p seq(floor((1/12)*(n-1)*(3*n+2)),n=1..50); # _Muniru A Asiru_, May 19 2018
%t Table[Floor[1/12 (n - 1) (3 n + 2)], {n, 45}] (* _Ivan Neretin_, May 19 2018 *)
%o (GAP) List([1..50],n->Int((1/12)*(n-1)*(3*n+2))); # _Muniru A Asiru_, May 19 2018
%K nonn
%O 1,4
%A _Clark Kimberling_