[已解决]VBA如何把21分解为5个整数之和

vbyou127

香川群子 发表于 2016-3-30 13:11
如果理解正确，那么做法很简单:

1. 取21选5组合=Combin(21,5)=20349种组合。

如何写代码

香川群子

vbyou127 发表于 2016-3-30 13:24
如何写代码

代码需要整合两种组合算法。任意m个中选n的组合算法，以及生成所有2^n-1的完全组合的算法。

这两个组合算法我都有，但是需要合并起来……

如果你只是计算这一组特定结果，就没必要麻烦写代码了吧。呵呵。

vbyou127

香川群子 发表于 2016-3-30 14:26
代码需要整合两种组合算法。任意m个中选n的组合算法，以及生成所有2^n-1的完全组合的算法。

这两个组合 ...

谁说没有必要

香川群子

vbyou127 发表于 2016-3-30 15:59
谁说没有必要

那你的问题是不是这个意思：

对于任意正整数m，求最少n个正整数，它们的组合之和可以覆盖[1,m]全范围。
并求出所有可能的组合。

最少个数n=-INT(-LOG(m,2)) （即2^n>=m）
m=21时，n=5

是这个意思吗？


好像之前有过这样类似的题目。
要求对于正整数m，在[1,m]范围内求最少n个正整数的集合，
然后可以按照任意2个数相加构成[1,m]范围内的其它有效数值，
直到最后其中的2个数加起来正好=m。

目的是，求n的最小值。
n的理论最大值=-INT(-LOG(m,2)) 即至多使用1,2,4,8……这样的n个2倍数集合，肯定可以得到解，
但这就不一定是最小值了。对于某些非2^n的正整数m来说，会有更好的办法得到更小的n值。

具体解法我要去查一下了。

vbyou127

香川群子 发表于 2016-3-30 16:29
那你的问题是不是这个意思：

对于任意正整数m，求最少n个正整数，它们的组合之和可以覆盖[1,m]全范围。 ...

两条差不多，看完下面这个或者你会完全明白了

这条更复杂http://www.excelpx.com/thread-387151-1-1.html


这条简化了http://www.excelpx.com/thread-387192-1-1.html

香川群子

原来是这个意思。

5个数排成圆圈，（首尾相连）
然后，
1个数有5种
相邻2个数之和有5种
相邻3个数之和有5种
相邻4个数之和有5种
相邻5个数之和有1种

所以合起来是21种组合。它们最大能覆盖[1,21]的整数区域。
求全部排列组合。

香川群子

已经编程算出来了。满足条件的只有2组。且是镜像的。

1        3        10        2        5
1        5        2        10        3

a543770434

香川群子 发表于 2016-3-31 14:37
已经编程算出来了。满足条件的只有2组。且是镜像的。

1        3        10        2        5

{:301:}好复杂的说