两个列表的元素最大值

Question

给出两个Mathematica数据集，如

data1 = {0, 1, 3, 4, 8, 9, 15, 6, 5, 2, 0};
data2 = {0, 1, 2, 5, 8, 7, 16, 5, 5, 2, 1};

如何创建一个集合，为我提供两个列表的最大值，即如何获取

data3 = {0, 1, 3, 5, 8, 9, 16, 6, 5, 2, 1};

？

Answer 1

data1 = {0, 1, 3, 4, 8, 9, 15, 6, 5, 2, 0};
data2 = {0, 1, 2, 5, 8, 7, 16, 5, 5, 2, 1};
Max /@ Transpose[{data1, data2}]
(* {0, 1, 3, 5, 8, 9, 16, 6, 5, 2, 1} *)

Answer 2

另一种可能的解决方案是使用MapThread函数：

data3 = MapThread[Max, {data1, data2}]

然而belisarius解决方案要快得多。

Answer 3

最简单，但不是最快的：

Inner[Max,data1,data2,List]