mathematica的计算问题假如有一些点比如:...{1,1},{1,2},{1,3},{2,3},{3,4}...把第一个坐标相同的点横坐标不变,纵坐标相加,经过处理变成:...{1,6},{2,3},{3,4}...这里是1是横坐标不变,纵坐标有三个为1、2、3,他们相加为6,则横坐标为1的纵坐标则为6,即:{1,6}了.这种算法怎样才能实现?

问题描述:

mathematica的计算问题
假如有一些点比如:
...{1,1},{1,2},{1,3},{2,3},{3,4}...
把第一个坐标相同的点横坐标不变,纵坐标相加,经过处理变成:
...{1,6},{2,3},{3,4}...
这里是1是横坐标不变,纵坐标有三个为1、2、3,他们相加为6,则横坐标为1的纵坐标则为6,即:{1,6}了.
这种算法怎样才能实现?

(*下面的代码产生一个随机的表:list,你也可以直接手动输入list*)list = Table[{Random[Integer,10],Random[Integer,10]},{j,1,20}];(*下面的代码对list2中第一个元素相同的表中的的第二个元素求和得到list4*)list2 =...