Saskatchewan Canada Member #19992 August 9, 2005 2867 Posts Offline

Posted: November 6, 2010, 9:34 am - IP Logged

Is there a tool that can create a set of numbers from using pairs and only being pair specific?

It will be easier to explain by example...

Say I have pairs 01, 24, 39, 58, 59, 89

I want to make sets of numbers using only these pairs with NO other numbers other than 2 corresponding pairs from above....

So I want to create only sets of numbers between 2 of the pairs from above and only using this numbers from the pairs BUTthey have to have a common number between the two pairs being used.

So there will be NO sets with 01 or 24 in it because none of the other pairs have a 0 or a 1 in it or a 2 or 4 in them, but there would be sets with 39, 58, 59, 89 because the 39 can match with 59 and 89 for 359 (both pairs 39 and 59 are in here) 389 (pairs 39/89) 589 (pairs 58/59) etc, but also want all possible 6 ways with them for str8 hits. Is there a tool or can one be created to do this?

Thanks

We are all Lucky... just some of us don't realize it!

ORLANDO, FLORIDA United States Member #4924 June 3, 2004 5896 Posts Offline

Posted: November 6, 2010, 11:02 am - IP Logged

Quote: Originally posted by Rakster on November 6, 2010

Is there a tool that can create a set of numbers from using pairs and only being pair specific?

It will be easier to explain by example...

Say I have pairs 01, 24, 39, 58, 59, 89

I want to make sets of numbers using only these pairs with NO other numbers other than 2 corresponding pairs from above....

So I want to create only sets of numbers between 2 of the pairs from above and only using this numbers from the pairs BUTthey have to have a common number between the two pairs being used.

So there will be NO sets with 01 or 24 in it because none of the other pairs have a 0 or a 1 in it or a 2 or 4 in them, but there would be sets with 39, 58, 59, 89 because the 39 can match with 59 and 89 for 359 (both pairs 39 and 59 are in here) 389 (pairs 39/89) 589 (pairs 58/59) etc, but also want all possible 6 ways with them for str8 hits. Is there a tool or can one be created to do this?

United States Member #41846 June 23, 2006 459 Posts Offline

Posted: November 7, 2010, 6:26 pm - IP Logged

Rakster

If you use macros this may help. as always try it in a new spreadsheet first

Sub combo_tool() Range("c3:bb50").Select Selection.ClearContents Selection.Interior.ColorIndex = 0 Selection.ColumnWidth = 3 Dim pt(10) pp = 50: t = 3: s = 3 ' # of possible pairs t is row to start storing valid pairs 'search list of possible pairs reject any that have no common #'s store good pairs in c,d 'assumes pairs are in col a,b starting at line 3 blank cell is end of list Cells(1, 4) = "Filtered": Cells(2, 4) = "no common #" 'heading Cells(1, 10) = "combinations and variations" For x = 3 To pp ' possible list of pairs up to 50 or more by changing this # If Cells(x, 1) = "" Then GoTo done1 ' end of list quit checking For y = 1 To 2: a = Cells(x, y) pt(a) = pt(a) + 1 Next y 'valid #'s will have a count greater than 1 Next x done1:

For x = 3 To pp ' possible list of pairs up to 50 or more by changing this # If Cells(3, 1) = "" Then GoTo done2 ' end of list quit checking a = Cells(x, 1): b = Cells(x, 2) If pt(a) > 1 Or pt(b) > 1 Then Cells(t, 4) = a: Cells(t, 5) = b: t = t + 1 Next x ' col 4&5 has the valid pairs done2:

For x = 3 To t - 1 ' t=# of valid pairs a = Cells(x, 4): b = Cells(x, 5) For z = x + 1 To t c = Cells(z, 4): d = Cells(z, 5) If c = a Then Cells(s, 8) = a: Cells(s, 9) = b: Cells(s, 10) = d: s = s + 1 If c = b Then Cells(s, 8) = a: Cells(s, 9) = b: Cells(s, 10) = d: s = s + 1 If d = a Then Cells(s, 8) = a: Cells(s, 9) = b: Cells(s, 10) = c: s = s + 1 If d = b Then Cells(s, 8) = a: Cells(s, 9) = b: Cells(s, 10) = c: s = s + 1 Next z Next x

For x = 3 To pp ' start show all 6 variations If Cells(3, 8) = "" Then GoTo done3 a = Cells(x, 8): b = Cells(x, 9): c = Cells(x, 10) 'variation 1 Cells(x, 12) = a: Cells(x, 13) = c: Cells(x, 14) = b Cells(x, 16) = b: Cells(x, 17) = c: Cells(x, 18) = a Cells(x, 20) = b: Cells(x, 21) = a: Cells(x, 22) = c Cells(x, 24) = c: Cells(x, 25) = a: Cells(x, 26) = b Cells(x, 28) = c: Cells(x, 29) = b: Cells(x, 30) = a

Saskatchewan Canada Member #19992 August 9, 2005 2867 Posts Offline

Posted: November 8, 2010, 4:32 pm - IP Logged

Quote: Originally posted by phileight on November 7, 2010

Rakster

If you use macros this may help. as always try it in a new spreadsheet first

Sub combo_tool() Range("c3:bb50").Select Selection.ClearContents Selection.Interior.ColorIndex = 0 Selection.ColumnWidth = 3 Dim pt(10) pp = 50: t = 3: s = 3 ' # of possible pairs t is row to start storing valid pairs 'search list of possible pairs reject any that have no common #'s store good pairs in c,d 'assumes pairs are in col a,b starting at line 3 blank cell is end of list Cells(1, 4) = "Filtered": Cells(2, 4) = "no common #" 'heading Cells(1, 10) = "combinations and variations" For x = 3 To pp ' possible list of pairs up to 50 or more by changing this # If Cells(x, 1) = "" Then GoTo done1 ' end of list quit checking For y = 1 To 2: a = Cells(x, y) pt(a) = pt(a) + 1 Next y 'valid #'s will have a count greater than 1 Next x done1:

For x = 3 To pp ' possible list of pairs up to 50 or more by changing this # If Cells(3, 1) = "" Then GoTo done2 ' end of list quit checking a = Cells(x, 1): b = Cells(x, 2) If pt(a) > 1 Or pt(b) > 1 Then Cells(t, 4) = a: Cells(t, 5) = b: t = t + 1 Next x ' col 4&5 has the valid pairs done2:

For x = 3 To t - 1 ' t=# of valid pairs a = Cells(x, 4): b = Cells(x, 5) For z = x + 1 To t c = Cells(z, 4): d = Cells(z, 5) If c = a Then Cells(s, 8) = a: Cells(s, 9) = b: Cells(s, 10) = d: s = s + 1 If c = b Then Cells(s, 8) = a: Cells(s, 9) = b: Cells(s, 10) = d: s = s + 1 If d = a Then Cells(s, 8) = a: Cells(s, 9) = b: Cells(s, 10) = c: s = s + 1 If d = b Then Cells(s, 8) = a: Cells(s, 9) = b: Cells(s, 10) = c: s = s + 1 Next z Next x

For x = 3 To pp ' start show all 6 variations If Cells(3, 8) = "" Then GoTo done3 a = Cells(x, 8): b = Cells(x, 9): c = Cells(x, 10) 'variation 1 Cells(x, 12) = a: Cells(x, 13) = c: Cells(x, 14) = b Cells(x, 16) = b: Cells(x, 17) = c: Cells(x, 18) = a Cells(x, 20) = b: Cells(x, 21) = a: Cells(x, 22) = c Cells(x, 24) = c: Cells(x, 25) = a: Cells(x, 26) = b Cells(x, 28) = c: Cells(x, 29) = b: Cells(x, 30) = a

Next x done3: Range("A1").Select End Sub

thanks...i appreciate your help... i never used macros before. Is this for excel? thanks

We are all Lucky... just some of us don't realize it!

Monkey Butt, USA United States Member #54569 August 23, 2007 1124 Posts Offline

Posted: November 8, 2010, 8:05 pm - IP Logged

Quote: Originally posted by Rakster on November 6, 2010

Is there a tool that can create a set of numbers from using pairs and only being pair specific?

It will be easier to explain by example...

Say I have pairs 01, 24, 39, 58, 59, 89

I want to make sets of numbers using only these pairs with NO other numbers other than 2 corresponding pairs from above....

So I want to create only sets of numbers between 2 of the pairs from above and only using this numbers from the pairs BUTthey have to have a common number between the two pairs being used.

So there will be NO sets with 01 or 24 in it because none of the other pairs have a 0 or a 1 in it or a 2 or 4 in them, but there would be sets with 39, 58, 59, 89 because the 39 can match with 59 and 89 for 359 (both pairs 39 and 59 are in here) 389 (pairs 39/89) 589 (pairs 58/59) etc, but also want all possible 6 ways with them for str8 hits. Is there a tool or can one be created to do this?

Thanks

Yes we have that here at Lottery Post. You would have to upgrade your membership to use this tool but it is a blast.

It is called the "Deflate 3 - Pick 3 Number Reduction System"

It does High/Low- Sums - Root Sums - Pairs - Number Position - Singles, Doubles, Triples - Key Numbers- Odd/Even.