The problem with:
CoefficientList[t, Variables[t]]
is that it appears to create a matrix with all the cross terms. Since you only want to first order terms, try out:
Coefficient[t, Variables[t], 1]
{1/2, 1/2, 2, 9/2, 8, 25/2, 18, 49/2, 32, 81/2}
instead.