powered by
ISDM(A, pvec, maxiter=500, tol=1e-07, tolbis=1e-08, verbose=FALSE)
VEM
EMICM
PGM
data(cosmesis) csub1 <- subset(cosmesis, subset=Trt==0, select=c(L,R)) ISDM(csub1) # data(pruitt) # ISDM(pruitt)
Run the code above in your browser using DataLab