的最佳矩阵（对于这一挑战的相当窄的范围）是通过获得“拉上”从正方形矩阵和获得最大的每一对中的所述对应的行和列中的元素。

例如，给定以下矩阵：

4 5 6
1 7 2
7 3 0

您可以将其与其转置组合以得到：[[[4,5,6],[4,1,7]],[[1,7,2],[5,7,3]],[[7,3,0],[6,2,0]]]。如果压缩每对列表，则会获得以下信息：[[(4,4),(5,1),(6,7)],[(1,5),(7,7),(2,3)],[(7,6),(3,2),(0,0)]]。最后一步是获取每对中的最大值以获取最佳矩阵：

4 5 7
5 7 3
7 3 0

您的任务是输出作为输入给出的方阵的最佳矩阵。矩阵将仅包含整数。I / O可以采用任何合理的格式进行。以字节为单位的最短代码（采用UTF-8或该语言的自定义编码）获胜！

测验

[[172,29]，[29,0]]-> [[172,29]，[29,0]]
[[4,5,6]，[1,7,2]，[7,3,0]]-> [[4,5,7]，[5,7,3]，[7,3,0 ]]
[[1,2,3]，[1,2,3]，[1,2,3]]-> [[1,2,3]，[2,2,3]，[3,3,3 ]]
[[4,5，-6]，[0,8，-12]，[-2,2,4]]-> [[4,5，-2]，[5,8,2]，[- 2,2,4]]

果冻，2个字节

»Z

在线尝试！

怎么运行的

»Z  Main link. Argument: M (integer matrix)

 Z  Zip the rows of M, transposing rows and columns.
»   Take the maxima of all corresponding integers.

Haskell，40个字节

z(z max)<*>foldr(z(:))e
e=[]:e
z=zipWith

在线尝试！

我将取消高尔夫为：

import Data.List
f m = zipWith (zipWith max) m (transpose m)

...如此优雅。

外壳，5 4字节

哎呀，‡以前（或†）从未使用过：

S‡▲T

在线尝试！

说明

S  T -- apply the function to itself and itself transposed
 ‡▲  -- bi-vectorized maximum

八度，13字节

@(A)max(A,A')

在线尝试！

MATL，6个字节

t!2$X>

在线尝试！

说明：

t        % Duplicate the input.
!        % Transpose the duplicate.
2$X>     % Elementwise maximum of the two matrices.

APL（Dyalog Unicode），3个字节

匿名默认前缀功能。

⊢⌈⍉

在线尝试！

⊢ 论点

⌈ 与天花板

⍉ 转置论证

JavaScript（ES6），48个字节

m=>m.map((r,y)=>r.map((v,x)=>v>(k=m[x][y])?v:k))

测试用例

let f =

m=>m.map((r,y)=>r.map((v,x)=>v>(k=m[x][y])?v:k))

console.log(JSON.stringify(f([[172,29],[29,0]]            ))) // -> [[172,29],[29,0]]
console.log(JSON.stringify(f([[4,5,6],[1,7,2],[7,3,0]]    ))) // -> [[4,5,7],[5,7,3],[7,3,0]]
console.log(JSON.stringify(f([[1,2,3],[1,2,3],[1,2,3]]    ))) // -> [[1,2,3],[2,2,3],[3,3,3]]
console.log(JSON.stringify(f([[4,5,-6],[0,8,-12],[-2,2,4]]))) // -> [[4,5,-2],[5,8,2],[-2,2,4]]

J，4个字节

隐式前缀功能。

>.|:

在线尝试！

>. [论点的]上限

|: 转置论点

Japt，12 10 8字节

瞧，妈，没有移调或压缩！

£XËwUgEY

尝试一下

CJam，8个字节

{_z..e>}

匿名块（函数），它从堆栈中获取输入并将其替换为输出。

在线尝试！或验证所有测试用例。

说明

{      }    e# Define block
 _          e# Duplicate
  z         e# Zip
   .        e# Apply next operator to the two arrays, item by item
            e# (that is, to rows of the two matrices)
    .       e# Apply next operator to the two arrays, item by item
            e# (that is, to numbers of the two rows)
     e>     e# Maximum of two numbers

R，23个字节

function(A)pmax(A,t(A))

在线尝试！

这等效于大多数其他答案。但是，max对于两种常见情况，R具有两个不同的功能：

max并min返回其参数中存在的所有值的最大值或最小值；如果全部为逻辑值，则返回整数；如果全部为数字，则返回double；否则返回character。

pmax并pmin采用一个或多个向量（或矩阵）作为参数，并返回一个向量，给出向量的“平行”最大值（或最小值）。结果的第一个元素是所有参数的第一个元素的最大值（最小值），结果的第二个元素是所有参数的第二个元素的最大值（最小值），依此类推。如有必要，较短的输入（非零长度）将被回收。

干净，58字节

import StdEnv,StdLib
@l=zipWith(zipWith max)(transpose l)l

我认为这不需要解释。

在线尝试！

C（gcc），79 77字节

• 感谢Steadybox节省了两个字节；仅接受一个矩阵维参数，因为此挑战中的所有矩阵均为平方。

j,i;f(A,n)int*A;{for(j=0;j<n*n;j++)printf("%d,",A[A[j]>A[i=j/n+j%n*n]?j:i]);}

在线尝试！

采用一个平面整数数组A，并将矩阵维数n（因为矩阵必须为正方形）作为输入。将平面整数数组字符串表示形式输出到stdout。

朱莉娅0.6，13字节

max.将功能max逐个应用于其扩展名。

a->max.(a,a')

在线尝试！

05AB1E，7个字节

ø‚øεøεà

在线尝试！

说明

ø         # transpose input matrix
 ‚        # pair with original matrix
  ø       # zip together
   ε      # apply on each sublist ([[row],[transposed row]])
    ø     # zip
     ε    # apply on each sublist (pair of elements)
      à   # extract greatest element

果冻，7个字节

żZZṀ€$€

在线尝试！

Python 2，45个字节

lambda k:[map(max,*c)for c in zip(k,zip(*k))]

在线尝试！

多亏了totalhuman节省了几个字节。

Pari / GP，21字节

m->(m+m~+abs(m-m~))/2

在线尝试！

Wolfram语言（Mathematica），23个字节

我的Pari / GP答案的端口。

(#+#+Abs[#-#])/2&

是\[Transpose]。

在线尝试！

Mathematica，30个字节

-8个字节感谢Jonathan Frech。

Map@Max/@t/@t@{#,t@#}&
t=#&

在线尝试！