# NOT RUN {
#============================================================================
# Example is taken from Henseler (2020)
#============================================================================
model_IT_Fex="
# Composite models
ITComp <~ ITCOMP1 + ITCOMP2 + ITCOMP3 + ITCOMP4
Modul <~ MOD1 + MOD2 + MOD3 + MOD4
ITConn <~ ITCONN1 + ITCONN2 + ITCONN3 + ITCONN4
ITPers <~ ITPSF1 + ITPSF2 + ITPSF3 + ITPSF4
# Saturated structural model
ITPers ~ ITComp + Modul + ITConn
Modul ~ ITComp + ITConn
ITConn ~ ITComp
"
out <- csem(.data = ITFlex, .model = model_IT_Fex,
.PLS_weight_scheme_inner = 'factorial',
.tolerance = 1e-06,
.PLS_ignore_structural_model = TRUE)
# }
Run the code above in your browser using DataLab