powered by
sureEst(y, x, v, sigma, iter=250, tol=1e-8)
data(etrait) x<- as.matrix(3/2-mdat) y<- as.matrix(traits)[,1:3] v<- list(c(1,25,50),numeric(0),3) o<- sureEst(y, x, v=v, iter=250, tol=1e-8)
Run the code above in your browser using DataLab