Operation Manual

Activiteiten 859
Simulatie van een steekproef zonder teruglegging
Simulatie van een steekproef zonder terugleggingSimulatie van een steekproef zonder teruglegging
Simulatie van een steekproef zonder teruglegging
Deze activiteit simuleert het trekken van ballen van verschillende kleuren uit een vaas
zonder teruglegging. Zie Programmeren voor meer informatie over de stappen die in dit
voorbeeld gevolgd worden.
Functie “steekproef zonder teruglegging”
Functie “steekproef zonder teruglegging”Functie “steekproef zonder teruglegging”
Functie “steekproef zonder teruglegging”
Definieer in de
Program Editor drawball( ) als een functie die met twee parameters kan
worden aangeroepen. De eerste parameter is een lijst waarvan elk element het aantal
ballen van een bepaalde kleur is. De tweede parameter is het aantal ballen dat
getrokken moet worden. Deze functie levert een lijst op waarin ieder element het aantal
ballen is dat van een bepaalde kleur getrokken is.
:drawball(urnlist,drawnum)
:Func
:Local templist,drawlist,colordim,
numballs,i,pick,urncum,j
:If drawnum>sum(urnlist)
:Return “too few balls”
:dim(urnlist)
!colordim
:urnlist
!templist
:newlist(colordim)
!drawlist
:For i,1,drawnum,1
:sum(templist)
!numballs
:rand(numballs)
!pick
(vervolg in volgende kolom)
:For j,1,colordim,1
:cumSum(templist)
!urncum
:If pick
 urncum[j] Then
:drawlist[j]+1
!drawlist[j]
:templist[j]
N1!templist[j]
:Exit
:EndIf
:EndFor
:EndFor
:Return drawlist
:EndFunc