Function that makes a draw from a uniform distribution

Create a function that makes draws from a uniform distribution. Function calls runif(1)

make.uniform.draw()

Value

A function that makes draws from a uniform distribution

Examples

set.seed(17)
net<-sim.bdh.age(1,1,5,2,1,c(1/3,1/3,1/3),hyb.inher.fxn = make.uniform.draw(),
complete=TRUE)[[1]]