芙蕾亚dnf:排列组合之最优算法（2）

来源：百度文库编辑：九乡新闻网时间：2024/05/05 15:42:51

'下面的代码中，结果字符串表示最终生成的一组组合的结果表达式,选择位数表示从一组数据中取数时，当前的取值在该数组中的位置，已取值数量表示已经从该数组中取的元素的个数，数组大小和共需选数量分别代表M取N组合中的M和N
'彭版的代码利用的是顺序取数的方法（至少我这么认为），也就是取了第二位数后，后面的取数不能再反过来取第二位前面的数，即只允许生成1，2，3的一组数，不能生成2，1，3的这样一组数
Public 结果字符串$, 选择位数%, 已取值数量%, 共需选数量%, 数组大小%
Public 元素数组
Sub 组合(结果字符串$, 取值位数%, 已取值数量%)
If 已取值数量 = 共需选数量 Then
      Range("C65536").End(xlUp).Offset(1) = 结果字符串
      Exit Sub
End If
If 取值位数 <= 数组大小 - (共需选数量 - (已取值数量 + 1)) Then
         '递归循环的条件是：当前的取值位数，不超过数组的总大小减去剩余可取值的数量(即共需选数量 - (已取值数量+1)，其中已取值数量+1代表的是当前的位数取过之后，已经取值的总个数)
         '例如1-8中选5个数，数组大小为8，共需选数量为5，则对于第3位数,已取值数量=2，已取值数量+1=3代表的就是当前取值位数3，
         '当前的取值位数<=数组大小 - (共需选数量 - (已取值数量 + 1)) =8-(5-(2+1))=6,即第三位数最多只能选数字6，因为如果第3位选7了话，后面剩余的第4位和第5位只有一个8可以取，那么就不足取了
         组合结果字符串 & " " & 元素数组(取值位数, 1), 取值位数 + 1, 已取值数量 + 1
                 '这一次递归调用的单个组合中的所有元素，即生成其中某一个组合，原理是利用递归循环，依次从数组M中选出N个数来
         '例如6选3，依次会生成1,12,123,当已选数量=3时候退出这一次递归
         组合结果字符串, 取值位数 + 1, 已取值数量
          '这一递归调用所有可能生成的组合，即当上面的递归已经满足选择了3个元素的时候，退出上面的递归，并将起始的取值位数向后移动一位
         '例如6选3，当上面已经生成了123一组数时，满足了退出上一个递归的条件，则将原有的取值位数+1，经过上面的递归，从栈中第一个弹出的取值位数=3 ，向后移动一位，则取值位数为4，'这样，就成功取到了1,2,4一组数
         '可以这样理解，第一个递归是单个组合内部横向取数，第二个递归是生成所有组合，即纵向取数
End If
End Sub

Sub main()
Range("C:C").Clear
数组大小 = [A65536].End(xlUp).Row
元素数组 = Range("A1:A" & 数组大小).Value
共需选数量 = [B1]
[C1] = "组合"
组合 "", 1, 0
End Sub

简化了一下代码，少了一些不必要的变量，本想做个flash来帮助理解，可惜不会。
彭版自己所阐述的太极一生二原理，我始终没能理解。不知道我自己上面的理解能不能得到认同。

排列组合之最优算法（2） Excel 排列组合之最优算法 “擦桌子”之排列组合排列组合练习题（二）排列组合 “擦桌子的主义”之排列组合 “擦桌子的主义”之排列组合帕雷托最优2 “擦桌子的主义”之排列组合易中天行测数学运算解题方法之排列组合问题人民日报-人民网六类健身运动堪称最优（健身之道）有研究人员认为六类健身运动堪称最优（健身之道）排列组合练习题排列组合公式诸葛亮马前课指算法2 大六壬算法讲解2 商家促销中的最优折扣率(2) 史上最优美的轻音乐2 解馋的下饭菜1之最优营养计量地理学革命（谷歌地图之最短路径算法）文本分类入门（十）特征选择算法之开方检验 - Jasper's Java Jacal - BlogJava 文本分类入门（十）特征选择算法之开方检验 - Jasper's Java Jacal - ... 汽车加油问题之贪心算法字符串匹配算法之Aho-Corasick