乐彩论坛

[问题求助] 行空午马老师请教跟随码公式怎么写 只看楼主

查看: 519 | 回复: 8 | 收藏: 0

行空午马老师请教
二期跟随号变
本行的对应码
公式怎么写的
就是统计前两期号码对应的出现次数,方法如下:
1、把上上行和上行的号码跟随的6个号与当前 行6个号一一对应,生成36组号;
2、把上上行的号和上行的号分别用34去减,然后组合成一个4位的跟随号,
如2015114期:上上行分别为03 27 10 19 20 01,上行为27 07 05 19 01 08,
生成的跟随号就是:3107  0727 2429 1515 1433 3326
本行的对应码为:20 13 08 30 27 25

请上传表格和模拟数据

谢谢行空午马老师

二期跟.xls

看不懂你的问题:
1 把上上行和上行的号码跟随的6个号与当前 行6个号一一对应,生成36组号,请在表格中模拟,你越仔细,我也越仔细给你写公式!!!
2 用34去减,然后组合成一个4位的跟随号,这个好懂,问题是:“本行的对应码为:20 13 08 30 27 25”,如何得到的?
当你觉得无法描述清楚问题时,最好的方式,就是仔细模拟你每一步要求的数据,方便别人理解你的意图,模拟2期的数据就足够了

哈哈
行空午马老师我不知道怎么算的,是在网上看到的,让我想一下,看有什么方法来算
现在换了一个麻烦你写一下表格公式

二期跟.xls

安出现的次数进行从大到小进行降

行空午马老师,加个VB在里面可以写
出二期跟随号变本行的对应码公式
Public Sub 开奖后统计跟随()
last = Range("A" & Rows.Count).End(xlUp).Row
Dim ar(1089, 33) As Integer
Erase ar
For i = 5 To last
For i1 = 0 To 5: j1 = Cells(i - 2, 10 + i1)
For i2 = 0 To 0: j2 = Cells(i - 1, 10 + i1)
For i3 = 0 To 5: j3 = Cells(i - 0, 10 + i3)
xx = j1 * 33 + j2 - 34
yy = j3 - 1
ar(xx, yy) = ar(xx, yy) + 1
Next: Next: Next
Next
For i = 0 To 1088
For j = 0 To 32
  Cells(3 + i, 31 + j) = ar(1088 - i, 32 - j)
Next: Next
End Sub

你自己偶尔在网上看到的内容,你自己或甚至它网都不能说清楚逻辑关系,且无法验证得到数据的准确率,就冒然发到这里求助,并不合适,大家的时间都很宝贵,你这样,谁还会帮助你?

1

京ICP证150165号 | 京ICP备13046446号