VBA 一道需要优化的数学题! ( 超极难Sheet1(4) )

On_fire

VBA 一道需要优化的数学题! ( 超极难Sheet1(4) )

*
Sheet1是源数据,
R(A-B) 及S( C )同行两列是一组, 是要处理的数据项集合，

其中A和B为R的单一子元素，C是对应的值( *有同值的情况 )
*
数据关系如下,
1.      

找到S列中的全局最小C值( 有同值的情况 )，作为全局基准值，

其对应的A-B为全局基准项，该基准项对应的子元素A和B作为标准子元素

（A-B维度下，一共最少2个或更多…? ）

*注: 当C值有相同, 在A-B维度下, 多少个标准子元素是变量…?
2.      

由标准子元素和各个其它元素的组合，

作为标准项（基准项衍生出每组序列的标准项，如题1-2是全局基准项（由3.9最小值得来），

其中1和2就是标准子元素，再用它来标定其它每个元素的全序列组合中的标准项，

比如元素3的全序列组合1-3，2-3....n-3，

其中1-3和2-3就是元素3的全序列组合中的2标准项；可以看出在A-B双螺旋的形式下，每组数据最多就2个标准项，如果是A-B-C就是3个标准项...以此类推，

这个维度同样决定了输出的行数，如题输出就是2行组合数据）
3.

输出结果：任意给出一个元素，列出其所有组合数据项，比如元素7，则列出7的所有组合项和其对应的标准值之差，(1-7,2-7...n-7）-（1-7，2-7）。形式如下：
        任意元素：B
第一行组合数据
        第1行标准组合 1-B   C1；  第1行标准组合 1-B    C1...
        第1个非标准项 3-B   C11；  第2个非标准项 4-B  C12...
        差值....                   C11X;    差值....                 C12X; ...
第二行组合数据
        第2行标准组合 2-B   C2；  第2行标准组合 2-B    C2...
        第1个非标准项 3-B   C21；  第2个非标准项 4-B  C22...
        差值....                   C21X;    差值....                 C22X; ...              
*
Sheet1(2)是部份模拟的计算过程及详细步骤
Sheet1(2)也是模拟的带排序的结果 ( 当C的差值是负值或等于0, 要输出带排序结果 )

Sheet1(3)是代码的参考代码 ( 注:C值没同值的情况! )

下帖的55, 56, 63, 76楼的Real3代码都可参考

https://club.excelhome.net/thread-1650530-8-1.html

*

Real4的Sheet1(4)是C值有同值下, 及更多的源资料.

这次要取多标准项及多标准子元素, 做处理, 也是这难题要再发帖的原因!

*
这题的难度极大,
恳请大神, 老师出手帮忙...!!!

grf1973

智商要充值。看不懂。

Moneky

曾经丢过分，就想问一句，楼主为什么有这么多问题？

你和 laoau128 是啥关系？

gwjkkkkk

理解楼主的意思比写代码还是费脑子。。。

shiruiqiang

这位大哥每天出难题，都看不懂

On_fire

grf1973 发表于 2023-1-17 16:31
智商要充值。看不懂。

RS同行两列是一组数据, R列是元素组合( 由两个元素组成 )

*

第1步 ( 分拆元素列 ),

每个元素及相关组合, 都要各自分拆成元素列

比如截图, 代表如何取得:元素列5

*

第2步 ( 找标准元素 ),

先找S列最小的值, 等于找到R的两个元素

如果S列有两个或以上的最小的同值, 那会找到更多元素

比如截图中,

2-3对2.8

1-2对2.8

( 2.8是最小的值, 故要取1, 2, 2, 3 为标准元素 )

*

第3步 ( 找差值 ),

比如截图中,

2-5, 1-5, 3-5的组合中包含标准元素(2, 1, 3)

所以他们的对应值(3.1, 6.2, 6.4 成了标准值 ).

再下一步,

标准值外的组合对应值, 分别减去, 所有标准值

*

截图中,

因为没找到比标准值(3.1, 6.2, 6.4)更小的或相减等于0,

元素5不用输出结果

On_fire

Moneky 发表于 2023-1-17 16:55
曾经丢过分，就想问一句，楼主为什么有这么多问题？

你和 laoau128 是啥关系？

老师好,
因为问题真的很多...
我跟他的唯一关系, 大家都是EH这大家族内的一名成员

On_fire

gwjkkkkk 发表于 2023-1-17 19:28
理解楼主的意思比写代码还是费脑子。。。

老师好,
请问6楼的截图解说, 更清楚明白吗?

On_fire

shiruiqiang 发表于 2023-1-17 19:30
这位大哥每天出难题，都看不懂

再比如, 截图中的元素列8

2-8, 3-8, 1-8的组合中包含标准元素(2, 3, 1)

所以他们的对应值(5.8, 8, 13成了标准值 ).

再下一步,

标准值外的组合对应值, 分别减去, 所有标准值

*

截图中,

找到5-8对应7.9比标准值(8, 13)更小的,

元素8要输出两个结果

ykcbf1100

快过年了，让大家轻松一点比较合适。