A data frame containing 22 variables with 305 observations.
BergamiBagozzi2000An object of class data.frame with 305 rows and 22 columns.
Survey among South Korean employees conducted and reported by Bergami2000;textualcSEM.
The dataset contains 22 variables and originates from a larger survey among South Korean employees conducted and reported by Bergami2000;textualcSEM. It is also used in Hwang2004;textualcSEM and Henseler2021;textualcSEM for demonstration purposes, see the corresponding tutorial.
#============================================================================
# Example is taken from Henseler (2021)
#============================================================================
model_Bergami_Bagozzi_Henseler="
# Measurement models
OrgPres =~ cei1 + cei2 + cei3 + cei4 + cei5 + cei6 + cei7 + cei8
OrgIden =~ ma1 + ma2 + ma3 + ma4 + ma5 + ma6
AffLove =~ orgcmt1 + orgcmt2 + orgcmt3 + orgcmt7
AffJoy =~ orgcmt5 + orgcmt8
Gender <~ gender
# Structural model
OrgIden ~ OrgPres
AffLove ~ OrgPres + OrgIden + Gender
AffJoy ~ OrgPres + OrgIden + Gender
"
out <- csem(.data = BergamiBagozzi2000,
.model = model_Bergami_Bagozzi_Henseler,
.PLS_weight_scheme_inner = 'factorial',
.tolerance = 1e-06
)
#============================================================================
# Example is taken from Hwang et al. (2004)
#============================================================================
model_Bergami_Bagozzi_Hwang="
# Measurement models
OrgPres =~ cei1 + cei2 + cei3 + cei4 + cei5 + cei6 + cei7 + cei8
OrgIden =~ ma1 + ma2 + ma3 + ma4 + ma5 + ma6
AffJoy =~ orgcmt1 + orgcmt2 + orgcmt3 + orgcmt7
AffLove =~ orgcmt5 + orgcmt6 + orgcmt8
# Structural model
OrgIden ~ OrgPres
AffLove ~ OrgIden
AffJoy ~ OrgIden"
out_Hwang <- csem(.data = BergamiBagozzi2000,
.model = model_Bergami_Bagozzi_Hwang,
.approach_weights = "GSCA",
.disattenuate = FALSE,
.id = "gender",
.tolerance = 1e-06)