# NOT RUN {
# }
# NOT RUN {
selectResponse <- lavaSearch2:::selectResponse
selectResponse.formula <- lavaSearch2:::selectResponse.formula
selectResponse(Y1~X1+X2)
selectResponse(Y1~X1+X2, format = "vars")
selectResponse(Surv(event,time)~X1+X2, format = "vars")
selectResponse(Y1~X1+Y1)
selectResponse(Y1+Y2~X1+Y1, format = "vars")
selectResponse(~X1+X2)
selectResponse(~X1+X2, format = "vars")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab