1 to: (c columnCount) do: [ :t | x _ c atColumn: t. "Create a vector of the entire column." sum at: t put: (x inject: 0 into: [ :acc :val | acc _ acc + val ]). "Accumulate the sum with inject." ].