mathematica怎么计算离散数据的最大值？

1、计算一组数据的最大值：

Max[5, 6, 7, 8, 9]

2、而这组数据也可以放到列表里面：

Max[{5, 6, 7, 8, 9}]

3、如果给出两个列表，也是给出全局的最大值：

Max[{1, 2, 3}, {5, 6, 9}]

4、再试试多维的列表：

Max[{{1, 2, 3}, {5, 6, 9}}]

5、如果需要得到多维列表的第一层子列表的最大值，需要用到Apply：

Max @@@ {{1, 2, 3}, {5, 6, 9}}

1、给出一个6*6的随机矩阵：

a = Table[RandomInteger[{1, 10}], 6, 6];

2、池化核的大小为3*3，也就是计算矩阵a每一个3*3的块矩阵的最大值：

b = Table[Max[a[[m ;; m + 2, n ;; n + 2]]], {m, 4}, {n, 4}];

这样可以得到一个4*4的矩阵。

3、对图像进行池化处理的时候，会让图像变小：

比如给出下面的图像，一张单通道的灰度图。

4、对图片进行池化处理，池化核大小是6*6：

a = img // ImageData;

{u, v} = img // ImageDimensions;

b = Table[Max[a[[m ;; m + 5, n ;; n + 5]]], {m, v - 5}, {n, u - 5}];

处理之后的图片变成了这样的。

5、池化核越大，得到的图像的细节越模糊，且图像尺寸越小：

b = Table[Max[a[[m ;; m + 10, n ;; n + 10]]], {m, v - 10}, {n, u - 10}];