函数，排列组合求最大

sucx007

魚。。 发表于 2021-5-25 11:08
没看懂，照规则来，这个怎么就对了呢？
=PRODUCT(LARGE(SUBTOTAL(4,OFFSET(A1:D1,ROW(1:15),)),{1;2;3;4}) ...

公式是有问题

cinlo

32760个组合，求出最大值。。。

魚。。

袁勇 发表于 2021-5-25 11:33
从截图上看，两个20不同行，为什么不能同时取？
第9行取C9，所以结果是99*20*18*20

黑黑，按照我理解的楼主描述的意思，上个附件。取这4个应该是乘积最大的。坐等学习

魚。。

sucx007 发表于 2021-5-25 11:35
公式是有问题

恩恩，其实99*20*20*17也不是最大呢。18*19就比20*17要大。所以我的理解应该取19*20*18*99。

@刘卓

cinlo 发表于 2021-5-25 11:35
32760个组合，求出最大值。。。

老师，请教这个组合数是怎么算出来的，数学太差了

jivy1212

魚。。 发表于 2021-5-25 11:38
黑黑，按照我理解的楼主描述的意思，上个附件。取这4个应该是乘积最大的。坐等学习

1. =MAX(10^MMULT(LOG(A2:D16),{1;1;1;1}))

复制代码

只会写外层的，内层的A2:D16等大神处理了。

魚。。

额，先上个又笨又长又卡的：

1. =MAX(EXP(MMULT(IFERROR(LN(SUBTOTAL(9,OFFSET(A1,TEXT(CODE(IF(MMULT(IFERROR(FIND({0,1,2,3,4,5,6,7,8,9,"A","B","C","D","E"},BASE(ROW(258:50366),15,4)),),ROW($1:$15)^0)=10,MID(BASE(ROW(258:50366),15,4),{1,2,3,4},1),"魚")),"[<60]0 7!/1")-54,{0,1,2,3}))),),{1;1;1;1})))

复制代码

WsnowNIU

这道题不适合用函数做，还是VBA吧。
本来是想写写的，两两列矩积，再把两个矩积，转换成一行，一列，再矩积，再去考虑不再同一行，这想法有点不现实了，坐等大神，给个神算法了。

cinlo

@刘卓 发表于 2021-5-25 12:02
老师，请教这个组合数是怎么算出来的，数学太差了

我蒙的：15*14*13*12=32760

jivy1212

cinlo 发表于 2021-5-25 13:38
我蒙的：15*14*13*12=32760

知识远远不够，只够想到15个位置放四个不同数的所有组合，要这样的内存数组。