powered by
Questa funzione permette di simulare un valore da una variabile casuale discreta con distribuzione di probabilita' assegnata.
gen.vc(x,p)
valori assumibili dalla variabile casuale
distribuzione di probabilita'
La funzione restituisce un numero casuale.
x <- c(-2,3,7,10,12) p <- c(0.2, 0.1, 0.4, 0.2, 0.1) y <- NULL for(i in 1:1000) y <- c(y,gen.vc(x,p)) table(y)/length(y)
Run the code above in your browser using DataLab