if (FALSE) {
selectRegressor <- lavaSearch2:::selectRegressor
selectRegressor.formula <- lavaSearch2:::selectRegressor.formula
selectRegressor(Y1~X1+X2)
selectRegressor(Y1~X1+X2, format = "vars")
selectRegressor(Y1~X1+Y1)
selectRegressor(Y1+Y2~X1+Y1, format = "vars")
selectRegressor(~X1+X2)
selectRegressor(~X1+X2, format = "vars")
}
Run the code above in your browser using DataLab