Forum strony www.multipasko.pl [Regulamin]


Dodaj wpis w tym temacie
Spis tematów
Login:

Hasło:
Strona: 1 2 ... 39 40 41 42
Wyślij wiadomość do admina

Przewiń wpisy ↓

Generator kombinacji gier liczbowych (moderator tematu: Amadeus)

2016-05-13 (14:01)

status ralfek
Data rejestracji: 2009-07-08 00:00:00
Ilość postów: 3863

4876
wpis nr 993 725
[ CZCIONKA MONOSPACE ]

Przyjrzyjcie się temu obrazkowi i powiedzcie czy w waszym mniemaniu jest to losowy rozklad?



--- wpis edytowano 2016-05-13 14:05 ---

2016-05-13 (14:41)

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

1386
wpis nr 993 746
[ CZCIONKA MONOSPACE ]

nie jest losowy ....widać gołym okiem



a tak naprawdę sprawdziłem wycinek

2016-05-13 (14:51)

status ralfek
Data rejestracji: 2009-07-08 00:00:00
Ilość postów: 3863

4876
wpis nr 993 749
[ CZCIONKA MONOSPACE ]

Leo, bardzo mi zalezy na wnioskach, powiedz dlaczego nie jest losowy golym okiem i dlaczego nie jest losowy po twoim sprawdzeniu i czym jest twoj rozowy obrazek





zastanawiałem się czy ktoś zobaczy w obrazku pęcherzyki podobne jak w rozkladzie galaktyk we wszechswiecie







ale jest inna wazniejsza kwestia

--- wpis edytowano 2016-05-13 15:03 ---

2016-05-13 (15:28)

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

1386
wpis nr 993 761
[ CZCIONKA MONOSPACE ]

ralfek> no to klops..... ,

nie pamiętam kolejności kliknięć jakie wykonałem....



być może wykonałem zamianę coloru jakiegoś pixela



czyli coś koło tego.....



If (Canvas.Pixels[i,j]= clwhite)and(Canvas.Pixels[i+1,j-1]<> clblack) and(Canvas.Pixels[i+1,j-1]<> clwhite) then



teraz nie wiem..........



nie myślałem ....że to ważne

myślałem że to lotto test jakiegoś randomu......



nie pamiętam kolejności analizy obrazu jaką wykonałem......

sorry



edit



może wieczorem przy piwku..... zobaczę jak to wyszło.....



--- wpis edytowano 2016-05-13 15:28 ---

2016-05-13 (15:30)

status ralfek
Data rejestracji: 2009-07-08 00:00:00
Ilość postów: 3863

4876
wpis nr 993 763
[ CZCIONKA MONOSPACE ]

bardziej interesują mnie wnioski niż technika



dlaczego uważasz, że nielosowe i co pokazuje Twój obrazek, nie technicznie ale w zwykłych słowach - rozumiem że to przetworzony obraz ale co "widać"



a no i obrazek jest niechlujnie przeze mnie wycięty, skadrowałeś go przed przetwarzaniem?



ogólnie jeśli znasz metody przetwarzania obrazu, które mogą wykryć prawidłowości to posłucham



"myślałem że to lotto test jakiegoś randomu...... " - a napisałeś że widać że nie losowy to losowy w końcuczy nie?

--- wpis edytowano 2016-05-13 15:35 ---

2016-05-13 (15:39)

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

1386
wpis nr 993 769
[ CZCIONKA MONOSPACE ]

wyszły mi jakieś kadry ........ dlatego szybko zakończyłem,

a co do metod analizy obrazu to nie wiem nic poza tym co jest w sieci,

wiesz ,że to temat bardzo rozległy.... i nieujarzmiony,a ja nie mam czasu

na dyskusje, bo się w to już dawno nie zajmuję, i po prostu...... zapomniałem języka,

jak to mówią...... nieużywany ....... umiera.





ale zerknę wieczorem na te mapę raz jeszcze



nie pamiętam w co kliknąłem......... przykro mi

--- wpis edytowano 2016-05-13 15:42 ---

2016-05-13 (16:47)

status Amadeus
Data rejestracji: 2009-04-30 00:00:00
Ilość postów: 820

4541
wpis nr 993 779
[ CZCIONKA MONOSPACE ]



@ralfek,



Moim zdaniem Twój test jest niebezpieczny dla niektórych ze względu na

https://en.wikipedia.org/wiki/Clustering_illusion



Amadeus

2016-05-13 (17:59)

status Zeolit
Data rejestracji: 2015-02-23 00:00:00
Ilość postów: 1622

14328
wpis nr 993 809
[ CZCIONKA MONOSPACE ]

@ralfek



W jakimś poście pisałeś o synchronizacji wyników z generatorem.

Czy jest szansa aby te generowane wyniki się zgrały.

Może być przypadek, że generator dobrze naśladuje losowania, ale

będzie przesunięty w czasie. Co wtedy?



Dla mnie generatorem są wyniki jakie serwuje totalizator.

I do nich próbuję się dopasować.

Chcę zrozumieć istotę "losu" i robić tak jak on.



Twierdzę, że na generowanych wynikach będę się mijał z celem.



Jednak nie powiem, że to jedyne słuszne podejście. Może ktoś

trafić na inne rozwiązanie.



Pozdrawiam
2016-05-13 (18:06)

status ralfek
Data rejestracji: 2009-07-08 00:00:00
Ilość postów: 3863

4876
wpis nr 993 813
[ CZCIONKA MONOSPACE ]

O problemie symulowania wynikow juz kiedys pisalem i dla mnie to martwa droga, nawet najlepiej nasladujacy model sypie sie jedno losowanie w przod i dalej bo no naturalna cecha losowosci
2016-05-13 (18:34)

status Amadeus
Data rejestracji: 2009-04-30 00:00:00
Ilość postów: 820

4541
wpis nr 993 821
[ CZCIONKA MONOSPACE ]



Generatory nie słuzą do odtwarzania fizycznego procesu losowań.

Służą do innych celów: testy, modelowanie zjawisk i biasów, wsady do filtrów

czy funkcji profilujących kombinacje, itd.



Generator mogący losować to, co losują maszyny totalizatora, musiałby być na tyle wielki, by móc swoim modelować ruch każdej cząstki we Wszechświecie,

co wyjaśnia między innymi praca cytowana w moim wpisie nr 959 964 tutaj

http://forum.multipasko.pl/n_viewtopic.php?id=4739&page=9



Praca ta przy okazji kasuje natrętnie powracające urojenia o "atraktorach".



Pozdrawiam ciepło,

Amadeus



2016-05-13 (18:52)

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

1386
wpis nr 993 822
[ CZCIONKA MONOSPACE ]

zdaje sie ze sie pomyliłem...... przez linnie poziome......jakie wyszły



coś przypuszczam że to był goniec,czyli przejscie z punktu do punktu według pewnych wytycznych koncentracji pixeli black and white



mniejsza o szczegóły ,bo to procesy mocno powikłane.....



ale jak zrobiłem powiekszenie...... a jest to łatwe ,wystarczy jeden track bar.



no to .sama interpretacja obrazu....... na oko.......

wydaje się losowa....... czyli sie pomyliłem..przez te kadry......nie wiem skąd one się pojawiły,

nie mogę Ci tego pokazać w programie, bo nie jest do końca mój..... tylko w części.



na kolejnych podmianach tła,koloru pixeli.....powiekszeniach ...... nic nie widzę ,więc

wniosek taki....... ze się jednak pomyliłem.

nic nie widać ciekawego.......







2016-05-13 (18:53)

status Amadeus
Data rejestracji: 2009-04-30 00:00:00
Ilość postów: 820

4541
wpis nr 993 823
[ CZCIONKA MONOSPACE ]



@777ch, ciekawe narzędzie!

Zechcesz opowiedzieć o nim więcej?



Amadeus

2016-05-13 (19:07)

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

1386
wpis nr 993 825
[ CZCIONKA MONOSPACE ]

Amadeus



To jest tylko zabawa obrazem ,

każdy punkt bitmapy ma swojego sąsiada......ten swojego itd



pisząc program można przemieszczać w zakresie bitmapy ,według swoich wytycznych

bazując na tych wspomnianych wartościach punktu .....

i sąsiednich...



oczywiście skala czyli idea jak daleko od punktu (x,y) analizujemy.zależy od

programisty....



to tylko zabawa obrazem ......

ale zabawa obrazem może mieć również zastosowania,

na przykład do odczytu tablic rejestracyjnych ....... czyli OCR



nie znam się na tym na tyle żeby tu o tym wykład robić

..... a poza tym ,te zagadnienia i inne dotyczące obrazu ..... sa w sieci,

jest tego tyle, pewnie na ...... kilka lat .







Co do tych sąsiadów to ......

poniżej jedna z prostych procedur ,manipulacji kolorem pixela



Var

i,j : Integer;

Image: TImage ;

Gl,Gs,Gp : integer;

L,S,P : integer;

Dl,Ds,Dp:integer;

Sw,Lw,Pw,Glw,Gsw,Gpw,Dlw,Dsw,Dpw :integer;

begin

memo1.Lines.Add('L|S|P,Gl|Gs|Gp,Dl|Ds|Dp');

Lw:=spinedit8.Value;//Ls

Sw:=spinedit9.Value;//S

Pw:=spinedit10.Value;//Ls

Glw:=spinedit11.Value;//Gl

Gsw:=spinedit12.Value;//Gs

Gpw:=spinedit13.Value;//Gp

Dlw:=spinedit14.Value;//Dl

Dsw:=spinedit15.Value;//Ds

Dpw:=spinedit16.Value;//Dp



With Image1.Picture.Bitmap do begin

PixelFormat := pf8Bit;



For i := 0 to Width-1 do begin

For j := 0 to Height-1 do begin



Gl:=0;

Gs:=0;

Gp:=0;

L:=0;

S:=0;

P:=0;

Dl:=0;

Ds:=0;

Dp :=0;

//=================================================================================

//--------Srodek czyli punkt [i,j] -----------------

If (Canvas.Pixels[i,j]= clblack)or(Canvas.Pixels[i,j]= clred) then S:=1;

If Canvas.Pixels[i,j]= clwhite then S:=2;

If ((Canvas.Pixels[i,j]<> clwhite)and(Canvas.Pixels[i,j]<> clblack)) then S:=3;

//--------Lewy czyli punkt [i-1,j] -----------------

If (Canvas.Pixels[i-1,j]= clblack)or(Canvas.Pixels[i-1,j]= clred)then L:=1;

If Canvas.Pixels[i-1,j]= clwhite then L:=2;

If ((Canvas.Pixels[i-1,j]<> clwhite)and(Canvas.Pixels[i-1,j]<> clblack)) then L:=3;



//--------Prawy czyli punkt [i+1,j] -----------------

If (Canvas.Pixels[i+1,j]= clblack)or(Canvas.Pixels[i+1,j]= clred) then P:=1;

If Canvas.Pixels[i+1,j]= clwhite then P:=2;

If ((Canvas.Pixels[i+1,j]<> clwhite)and(Canvas.Pixels[i+1,j]<> clblack)) then P:=3;

//=================================================================================



//--------Gora lewy czyli punkt [i-1,j-1] -----------------

If (Canvas.Pixels[i-1,j-1]= clblack)or(Canvas.Pixels[i-1,j-1]= clred) then Gl:=1;

If Canvas.Pixels[i-1,j-1]= clwhite then Gl:=2;

If ((Canvas.Pixels[i-1,j-1]<> clwhite)and(Canvas.Pixels[i-1,j-1]<> clblack)) then Gl:=3;

//--------Gora srodek czyli punkt [i,j-1] -----------------

If (Canvas.Pixels[i,j-1]= clblack)or(Canvas.Pixels[i,j-1]= clred) then Gs:=1;

If Canvas.Pixels[i,j-1]= clwhite then Gs:=2;

If ((Canvas.Pixels[i,j-1]<> clwhite)and(Canvas.Pixels[i,j-1]<> clblack)) then Gs:=3;



//--------Gora prawy czyli punkt [i+1,j-1] -----------------

If (Canvas.Pixels[i+1,j-1]= clblack)or(Canvas.Pixels[i+1,j-1]= clred) then Gp:=1;

If Canvas.Pixels[i+1,j-1]= clwhite then Gp:=2;

If ((Canvas.Pixels[i+1,j-1]<> clwhite)and(Canvas.Pixels[i+1,j-1]<> clblack)) then Gp:=3;



//=================================================================================

//--------Dol lewy czyli punkt [i-1,j+1] -----------------

If (Canvas.Pixels[i-1,j+1]= clblack)or(Canvas.Pixels[i-1,j+1]= clred) then Dl:=1;

If Canvas.Pixels[i-1,j+1]= clwhite then Dl:=2;

If ((Canvas.Pixels[i-1,j+1]<> clwhite)and(Canvas.Pixels[i-1,j+1]<> clblack)) then Dl:=3;

//--------Dol srodek czyli punkt [i,j+1] -----------------

If (Canvas.Pixels[i,j+1]= clblack)or(Canvas.Pixels[i,j+1]= clred) then Ds:=1;

If Canvas.Pixels[i,j+1]= clwhite then Ds:=2;

If ((Canvas.Pixels[i,j+1]<> clwhite)and(Canvas.Pixels[i,j+1]<> clblack)) then Ds:=3;



//--------Dol prawy czyli punkt [i+1,j+1] -----------------

If (Canvas.Pixels[i+1,j+1]= clblack)or(Canvas.Pixels[i+1,j+1]= clred) then Dp:=1;

If Canvas.Pixels[i+1,j+1]= clwhite then Dp:=2;

If ((Canvas.Pixels[i+1,j+1]<> clwhite)and(Canvas.Pixels[i+1,j+1]<> clblack)) then Dp:=3;







If ((L=1) and (S=1) and (P=1) and (Gl=2) and (Gs=2) and (Gp=2) and (Dl=1)and(Ds=1) and(Dp=1)) THEN begin

Canvas.Pixels[i,j]:= clred;







end;

end;

end;

end;



end;







2016-05-13 (19:30)

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

1386
wpis nr 993 832
[ CZCIONKA MONOSPACE ]

Dla mnie najciekawsze były porównania ...... (CompareModels(A, B: TModel))

ale ......

jak wspomniałem ,to wiedza dostępna w sieci.







2016-05-13 (19:56)

status Zeolit
Data rejestracji: 2015-02-23 00:00:00
Ilość postów: 1622

14328
wpis nr 993 836
[ CZCIONKA MONOSPACE ]

@Amadeus



Z tamtym tematem to się w jednym zgadzam.

Odpoczynek od forum się przyda. Może przyjdzie świeże

spojrzenie na to wszystko. Zobaczymy.



Pozdrawiam
2016-05-13 (21:53)

status ralfek
Data rejestracji: 2009-07-08 00:00:00
Ilość postów: 3863

4876
wpis nr 993 884
[ CZCIONKA MONOSPACE ]

Leo dzięki
2016-05-13 (21:53)

status Amadeus
Data rejestracji: 2009-04-30 00:00:00
Ilość postów: 820

4541
wpis nr 993 886
[ CZCIONKA MONOSPACE ]

@777ch,



Kiedyś testowałem algorytm "wyostrzający" na bitmapie wygenerowanej z losowań Lotto (generowanej na kilka sposobów).



Zacząłem już widzieć jakieś choinki i inne iglaki, ale coś mnie tknęło i przeczytałem opis tego algorytmu wyostrzania. I znalazłem wzmiankę

o mieszaniu z losowym szumem Perlina, a to "losowe" oznaczało oczywiście

"pseudolosowe", a krótka zabawa z "exekiem" programu wyostrzającego zweryfikowała moje zle przeczucia: "losowość" pochodziła z nędznego generatora LCG wbudowanego w język programowania i stąd brały się jakieś artefakty (LCG przegrywa z testem rozkładu w dwóch wymiarach)



Dlatego ciekawą mnie wszystkie metody graficznej analizy danych nie posługującej się żadnym dodatkowym inputem, jedynie operujące na czystych danych wejściowych.



Pozdrawiam ciepło,

Amadeus

2016-05-13 (21:56)

status ralfek
Data rejestracji: 2009-07-08 00:00:00
Ilość postów: 3863

4876
wpis nr 993 891
[ CZCIONKA MONOSPACE ]

mnie też to ciekawi bo uważam, że siła losowości jest zaklęta w geometrii,a chyba poprawniej - topografii



plaska mapa niewiele tu chyba da ale to jakiś krok w przód
2016-05-13 (22:07)

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

1386
wpis nr 993 904
[ CZCIONKA MONOSPACE ]

Amadeus>

.....metody graficznej analizy danych.....

takie rzeczy można jak najbardziej robić..



tylko sama wygenerowana mapa ,która uwidoczni jakieś punkty .....nic nie powie



do tego kwestia ulokowania........ tych punktów



wszystko to jest mocno zawikłane....

to nie to samo co problem komiwojażera......



tu .czyli w przrypadku lotto.....

nie wiemy gdzie jest początek drogi a gdzie koniec.......

aby wytyczyć najkrótsza trasę......



innymi słowy .....jak się uparł mój znajomy architekt z Zurichu ......Zufall

czyli przypadek.....z którym nie należy walczyć ......tak jakoś to było powiedziane....

czyli ....... nie ma szans aby coś przewidzieć......

Ja tam mam inne zdanie.. ale to nie ma nic do rzeczy,

sprawa opiera się o koszty...... i zyski...... ale możemy tylko i wyłącznie szacować straty

bo zyski ....... czyli wygrane 1-stopnia...... to punkt ......newralgiczny
2016-05-13 (22:20)

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

1386
wpis nr 993 915
[ CZCIONKA MONOSPACE ]

Tak sobie teraz pomyślałem .że mozna by porównać jakis wzór graficzny .....z innym

jeden byłby prawidłowy drugi przekłamany czyli zafałszowany.



ale



ile punktów w tablicy

100x100

1000x1000



jak określić punkty modelu A ....... czyli prawidłowego rozkładu punktów np csn



jak je umiejscowić w tablicy .... itd itd



to wszystko jest ...... czasochłonne........ a czas ucieka tak szybko.....

wydaje mi się,z całym szacunkiem dla waszych dociekań........ szkoda na to czasu



może lepiej szacować jakiego typu strefy ...... są prawidłowe....... a jakie omijać.....



| Dodaj wpis w tym temacie | Spis tematów | Wyniki lottoStrona: 1 2 ... 39 40 41 42
Wyślij wiadomość do admina