symulacje

Generowanie wartości losowych z rozkładu trójkątnego - metoda eliminacji

# liczba generowanych wartości
n=100
# parametry rozkładu trójkątnego
z=c(); a=0; b=1; d=2
licz=0
repeat

{
u1=runif(1,a,b)
u2=runif(1,0,d)
if (u2<2*u1) {z=c(z,u1); licz=licz+1}
if (licz>=100) break
}

# wyświetlenie wyników
x