Qbab
12/4/2006 12:12:00 PM
[...]
> Poszukalem w ksiazkach i jedyne co znalazlem to w ksiazce "Komputerowe
> generatory liczb losowych" Wieczorkowskiego i Zielinskiego propozycje, aby
> generatory inicjowac przy pomocy wartosci
> 1) r+100(m-1+12(d-1+31(g+24(min+60s))))
> lub
> 2) s+60(min+60(g+24(d-1+31(m-1+12r))))
> Gdyby przypadkiem liczby te byly parzyste dodac jeszcze do nich 1. (m -
miesiac
> od 1 do 12, g - godzina od 0 do 23, min - minuta od 0 do 59, s - sekunda
od 0 do
> 59, r - ostatnie dwie cyfry roku)
>
> W necie natomiast nie znalazlem nic konkretnego.
>
> Moze ktos z Grupowiczow mial problem podobny do mojego i zna jakies jego
"jak
> nabardziej losowe rozwiazanie" :)
to mo?e ja ci napisze jak ja to robie :)
stosuje taki generator który wymaga by ziarno by3o ujemne
robie sobie to tak:
CALL GETDAT(iy, imon, id)
CALL GETTIM(ih,im,is,i1)
nseed=(-(imon*100000000+ih*1000000+im*10000+is*100+i1))
zaleta jest taka ?e ziarno nigdy nie jest takie samo co pozwala mi sie
zabawic i porównac wyniki przy starcie symulacji przy roznych ziarnach :)
jak na razie nie znalazlem problemu w swojej pracy gdzie by takie podejscie
dawalo jakiekolwiek problemy.
ale poczytaj jeszcze takie publikacje:
Advances in Mathematics 188 (2004) 444-469 (J.H. Kima and V.H. Vub)
Computers and Mathematics with Applications 47 (2004) 217-226 (LAP-PIU LEE
AND KWOK-WO WONG)
to sobie przetestujesz czy Ci prawidlowo dziala a i sporo dono?ników w nich
by3o jak szukalem
pozdr. Qbab