# We create a variable and a matrix model that consists of
# two covariates.
k=1000
m=10
maxiter=100
y <- rbinom(k,m,0.87)
x1 <- rnorm(k,1,50)
x2 <- rnorm(k,30,9)
X <- cbind(1,x1,x2)
BIiwls(y,X,m,maxiter)
Run the code above in your browser using DataLab