a = {{-800, 1712}, {-801, 1713}, {-806, 1832}} TableForm[a] b = a[[All, 2]] - Min[a[[All, 2]]] How do I make a new matrix (list) whic looks like this
-800 1712 0 -801 1713 1 -806 1832 120 The 3rd column, takes the difference between the value from the 2nd column and it's minimum of the whole 2nd column.
I tried to Join the two, but with no success.
Thanks.




