Forum strony www.multipasko.pl [Regulamin]


Dodaj wpis w tym temacie
Spis tematów
Login:

Hasło:
Strona: 1 2 ... 342 343 344 ... 560 561
Wyślij wiadomość do admina

Przewiń wpisy ↓

moje ... oprogramowanie

2020-05-10 (14:02)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8988

14865
wpis nr 1 291 770
[ CZCIONKA MONOSPACE ]

siger7>

Ściągnąłem i widzę, że nie zrozumiałeś idei.
Ten układ w komórkach A1:H6 to nie są liczby.
To jest matryca!

Skoro wyeliminowałeś liczbę 20 to ten układ powinien wyglądać tak:

1 2 3 4 5 6 7 8
9 10 11 12 13 14 15 16
17 18 19 21 22 23 24 25
26 27 28 29 30 31 32 33
34 35 36 37 38 39 40 41
42 43 44 45 46 47 48 49

I w takim układzie nie mogą się powtarzać liczby w kolumnach !

Teraz wygeneruj rozpis i sprawdzaj.

Możesz w dowolny sposób podstawić rzeczywiste liczby pod tę matrycę, wcale nie muszą to być kolejne liczby. Ale tak jak je podstawisz pod matrycę tak trafienia nie mogą się powtarzać w kolumnach.

Pozdrawiam

--- wpis edytowano 2020-05-10 14:17 ---

2020-05-10 (14:34)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 23087

1386
wpis nr 1 291 781
[ CZCIONKA MONOSPACE ]

fair_play

masz zmienną
--> gwar

adres = 0
For l1 = 1 To liczb - gwar

co ukryłeś ?
bo nie jest inicjowana nigdzie ?
2020-05-10 (14:36)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8988

14865
wpis nr 1 291 782
[ CZCIONKA MONOSPACE ]

siger7>

Nie przeczytałeś powyższego uważnie.

To jest matryca. Możesz pod nią podstawić wybranych 48 liczb w dowolny sposób. Jeśli pominąć 20 to np tak:

10 6 19 25 37 2 35 27
3 43 15 48 12 41 16 8
22 31 34 1 40 32 46 21
14 38 45 28 7 36 4 30
33 23 49 11 47 29 39 44
26 5 9 17 18 42 24 13

I w takim układzie trafienia nie mogą się znajdować w tej samej kolumnie bo na pewno na żadnym kuponie się nie zejdą.
Jeśli wygenerujesz rozpis wg tego układu to na zadnym kuponie nie będzie jednocześnie 1 i 11, 4 i 24, 15 i 45 itd.
2020-05-10 (14:39)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8988

14865
wpis nr 1 291 784
[ CZCIONKA MONOSPACE ]

777ch>

Wywalałem to gwar i zastępowałem je liczbą, widać tam gdzie pytasz przeoczyłem. gwar to po prostu ilość trafień. Jeśli sprawdzasz 6-ki to 6, jeśli 5-ki to 5.

Pozdrawiam
2020-05-10 (14:44)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 291 786
[ CZCIONKA MONOSPACE ]


@fair_play

Zerknij jeszcze raz do arkusza excela, ktory Ci wyslalem. Matryca jest prawidlowa. Jest '20' ?

--- wpis edytowano 2020-05-10 14:47 ---

2020-05-10 (14:48)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 291 793
[ CZCIONKA MONOSPACE ]

zdjęcie
2020-05-10 (14:51)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 23087

1386
wpis nr 1 291 794
[ CZCIONKA MONOSPACE ]

gwar to w twojej funkcji -->0

nigdzie nie widzę inicjowania
czy przypisania wartości dla gwar ?


adres = 0
For l1 = 1 To liczb - gwar


w zasadzie to gwar nie istnieje
czy miało jakieś uzasadnienie ?

--- wpis edytowano 2020-05-10 14:54 ---

2020-05-10 (15:00)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8988

14865
wpis nr 1 291 797
[ CZCIONKA MONOSPACE ]

777ch>

Tworząc procedurę myślałem, że będzie ona uniwersalna dla sprawdzania 4,5,6,7,8 stąd to gwar. Później jak się okazało, że każda procedura będzie osobną zastępowałem ją liczbą.

Jesli Twoje pytanie dotyczy sprawdzania 6-tek to ta linia powinna wyglądać tak:

For l1 = 1 To liczb - 6
i w poniższych liniach też 6 zamiast gwar.

Na początku procedury miałem jej inicjację gwar=6, ale później ją wywaliłem zapomniawsze podmienić w niej gwar na 6.
2020-05-10 (15:03)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 23087

1386
wpis nr 1 291 798
[ CZCIONKA MONOSPACE ]

moje pytanie dotyczy

Function liczby_6(lokacja, ile)

''''''''''''''''''''''''''''liczb = 80
gwar = 5 //jakwstawię 4 czy 3 czy 0 to--> wsio ryba
adres = 0
For l1 = 1 To liczb - gwar
adres_tmp = adres
adres = adres + Combine(liczb - l1, 5)
If adres >= lokacja Then
adres = adres_tmp
Exit For
End If
Next l1

braki(ile, 0) = l1

For l2 = l1 + 1 To liczb - (gwar - 1)

itd

czemu to miało służyć
bo widzę że tonic nie zmienia.......
dla wypisu braków
2020-05-10 (15:10)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 23087

1386
wpis nr 1 291 799
[ CZCIONKA MONOSPACE ]

oczywiście rozumiem
co trzeba zrobić
ale zapytałem..... z ciekawości

u mnie to dopiero jest
galimatias zmiennych......
z których zrezygnowałem
2020-05-10 (15:11)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8988

14865
wpis nr 1 291 800
[ CZCIONKA MONOSPACE ]

777ch>

wcześniej zdefiniowane braki(100000,6)

a funkcja wygląda tak:

Function liczby_6(lokacja, ile)

adres = 0
For l1 = 1 To liczb - 6
adres_tmp = adres
adres = adres + kombinuj(liczb - l1, 5)
If adres >= lokacja Then
adres = adres_tmp
Exit For
End If
Next l1

braki(ile, 1) = l1

For l2 = l1 + 1 To liczb - 5
adres_tmp = adres
adres = adres + kombinuj(liczb - l2, 4)
If adres >= lokacja Then
adres = adres_tmp
Exit For
End If
Next l2

braki(ile, 2) = l2

For l3 = l2 + 1 To liczb - 4
adres_tmp = adres
adres = adres + kombinuj(liczb - l3, 3)
If adres >= lokacja Then
adres = adres_tmp
Exit For
End If
Next l3

braki(ile, 3) = l3

For l4 = l3 + 1 To liczb - 3
adres_tmp = adres
adres = adres + kombinuj(liczb - l4, 2)
If adres >= lokacja Then
adres = adres_tmp
Exit For
End If
Next l4

braki(ile, 4) = l4

For l5 = l4 + 1 To liczb - 2
adres_tmp = adres
adres = adres + kombinuj(liczb - l5, 1)
If adres >= lokacja - 1 Then
adres = adres_tmp
Exit For
End If
Next l5

braki(ile, 5) = l5

l6 = l5 + (lokacja - adres)

braki(ile, 6) = l6

End Function

Jeśli po jej wykonaniu wyświetlisz braki() to będziesz miał ich liczbową listę

P.S. Domyślam się o co chodzi ale czy mógłbyś rozszyfrować ten skrót csn, bo wujek Google traktuje go medycznie

--- wpis edytowano 2020-05-10 15:17 ---

2020-05-10 (15:17)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 23087

1386
wpis nr 1 291 803
[ CZCIONKA MONOSPACE ]



okidoki

Słuchaj ,zauważyłem że np dla V=32 dla gw 6
21 ≤ C(32,23,6) ≤ 27
Created by: LJCR

-- Gwar.6 if [6] --test Fairplay
C(32,23,6,6)=100 % brak[0]
Brak {0}
Sprawdzono zbiór = 906192 kombinacji
Gwar..[6]= 100 %
Time calculated : 135,604 ms..by fairplay


-- Gwar.6 if [6] --nospeed
C(32,23,6,6)=27[-0]
Brak real {0}
Sprawdzono zbiór = 906192 kombinacji
Gwar..[6]= 100 %
Time calculated : 101,238 ms

im mniejsze v tym bardziej moja jest szybsza

a jeszcze do tego Sindbad robi to raz szybciej



2020-05-10 (15:26)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8988

14865
wpis nr 1 291 805
[ CZCIONKA MONOSPACE ]

"a jeszcze do tego Sindbad robi to raz szybciej "

A do tego ma jeszcze tylko mini komputer.

Gdyby miał taki kombajn jak my to robiłby to z 10 razy szybciej

P.S. Domyślam się o co chodzi ale czy mógłbyś rozszyfrować ten skrót csn, bo wujek Google traktuje go medycznie

--- wpis edytowano 2020-05-10 15:26 ---

2020-05-10 (15:42)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8988

14865
wpis nr 1 291 810
[ CZCIONKA MONOSPACE ]


siger7>

Przeanalizowałeś mój wpis 1 291 782 ?
2020-05-10 (15:47)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8988

14865
wpis nr 1 291 811
[ CZCIONKA MONOSPACE ]

777ch>

okidoki

Zauważyłem że moja funkcja Kombinuj(n,k) jest szybsza od Twojej Combine(n,m), a ponieważ jest ona wykonywana nader często może to mieć istotne znaczenie.

Ty w swojej liczysz "licznik" i "mianownik" w osobnych pętlach. Ja liczę oba w tej samej.

Jeśli chodzi o csn to rozumiem, pytałem co znaczy "c", co "s" a co "n".

--- wpis edytowano 2020-05-10 15:52 ---

2020-05-10 (15:50)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 23087

1386
wpis nr 1 291 814
[ CZCIONKA MONOSPACE ]

csn to index leksykograficzny

csn to po prostu numer kolejny kombinacji

2,15,53,67
1,3,18,56,61
1,2,4,22,26,28
1,2,3,5,25,49,66
1,2,3,4,6,29,51,73
1,2,3,4,5,7,34,42,54
1,2,3,4,5,6,8,39,69,70
1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,19,55,65,75

wszystkie mają ten sam index = 111111
2020-05-10 (15:51)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 23087

1386
wpis nr 1 291 816
[ CZCIONKA MONOSPACE ]

fair_play

a czy są rzeczywiście znaczne różnice przy funkcji kombinuj
bo mi się nie chce sprawdzać........
2020-05-10 (15:55)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 8988

14865
wpis nr 1 291 817
[ CZCIONKA MONOSPACE ]

co uważasz za znaczne ?

Przy 10 000 000 powtórzeń w excelu różnica ponad pół sekundy.

Możesz mi podać jaki rozpis sprawdza sindbad, bo już nie mogę go u siebie znaleźć.

--- wpis edytowano 2020-05-10 15:57 ---

2020-05-10 (16:44)

status 777ch
Data rejestracji: 2005-11-07
Ilość postów: 23087

1386
wpis nr 1 291 852
[ CZCIONKA MONOSPACE ]

Sprawdził bazę do wczoraj
czyli 12387 wylosowanych dwudziestek Multi
pod katem
brak5
brak6


różnica ponad pół sekundy........
to za mało żeby się tym .....przejmować.....


--- wpis edytowano 2020-05-10 16:45 ---

2020-05-10 (17:47)

status edi8
Data rejestracji: 2007-04-03
Ilość postów: 41774

2623
wpis nr 1 291 867
[ CZCIONKA MONOSPACE ]

"co znaczy "c", co "s" a co "n".

fair_play, to jest rozwinięcie tego terminu:
CSN = Combination Sequence Number

Pozdrawiam

--- wpis edytowano 2020-05-10 17:48 ---

| Dodaj wpis w tym temacie | Spis tematów | Wyniki lottoStrona: 1 2 ... 342 343 344 ... 560 561
Wyślij wiadomość do admina