A302302 Number of triples (i,j,k) such that i+j+k > 0 with -n <= i,j,k <= n.
0, 10, 53, 153, 334, 620, 1035, 1603, 2348, 3294, 4465, 5885, 7578, 9568, 11879, 14535, 17560, 20978, 24813, 29089, 33830, 39060, 44803, 51083, 57924, 65350, 73385, 82053, 91378, 101384, 112095, 123535, 135728, 148698, 162469, 177065, 192510, 208828, 226043
Offset: 0
Links
- Index entries for linear recurrences with constant coefficients, signature (4,-6,4,-1)
Programs
-
Mathematica
a[n_]:=Total[Flatten[Table[Table[Table[If[i+j+k>0,1,0],{i,-n,n}],{j,-n,n}],{k,-n,n}]]]; Table[a[n],{n,0,32}]
-
PARI
a(n) = n*(3+9*n+8*n^2)/2; \\ Altug Alkan, Apr 08 2018
Comments