# NOT RUN {
Simulated=Simulate(n=1000,MissingYN=0,exampleNum=2)
#MissingYN is 1 for add missing data 0 is default which is don't add missing data
uu=Initialize(Simulated,WhichCat=c(1,1,1,1,1,0,1,0,0),
DataFileName="Example2",NameFile="Example2D",Directry=getwd())
AB=AllBackwardSelect(uu[[1]],Directry=getwd())
x=scan(paste(getwd(),"/","Example2D","/","Example2D_","26",".out",sep=""),what=character())
gg=ParseTotalEffects(x,"Example2D",Directry=getwd())
# }
Run the code above in your browser using DataLab