library(readxl)
library(seminr)
sem <- read_excel("sem.xlsx")
explore data
head(sem)
model
mm<-constructs(composite("Bus_tangible",multi_items("BT",1:7)),composite("Bus_driver",multi_items("BD",1:4)),composite("Empathy",multi_items("EMP", 1:5)),composite("Eniromental_performance",multi_items("EP",1:4)),composite("customer_satisfaction",multi_items("CS",1:3)),composite("Life_satisfaction",multi_items("LS",1:5)),interaction_term(iv="Bus_tangible",moderator ="Bus_driver",method = two_stage))
#structural model
sm<-relationships(paths(from=c("Bus_tangible","Bus_driver","Empathy","Eniromental_performance"),to="customer_satisfaction"),paths(from =c("customer_satisfaction","Bus_tangible","Bus_driver","Bus_tangible*Bus_driver"),to="Life_satisfaction"))
#Estimating the model
estimate<-estimate_pls(data = sem,measurement_model = mm,structural_model = sm)
## Generating the seminr model
## All 272 observations are valid.
#summary
summary<-summary(estimate)
summary
##
## Results from package seminr (2.3.2)
##
## Path Coefficients:
## customer_satisfaction Life_satisfaction
## R^2 0.447 0.123
## AdjR^2 0.439 0.110
## Bus_tangible 0.181 0.225
## Bus_driver 0.143 0.047
## Empathy 0.307 .
## Eniromental_performance 0.231 .
## customer_satisfaction . 0.141
## Bus_tangible*Bus_driver . 0.007
##
## Reliability:
## alpha rhoC AVE rhoA
## Bus_tangible 0.851 0.887 0.529 0.858
## Bus_driver 0.856 0.902 0.698 0.857
## Empathy 0.825 0.876 0.586 0.840
## Eniromental_performance 0.920 0.944 0.808 0.926
## customer_satisfaction 0.941 0.962 0.895 0.944
## Bus_tangible*Bus_driver 1.000 1.000 1.000 1.000
## Life_satisfaction 0.903 0.929 0.724 0.913
##
## Alpha, rhoC, and rhoA should exceed 0.7 while AVE should exceed 0.5
#iteration to converge
summary$iteration
## [1] 5
#loadings
summary$loadings
## Bus_tangible Bus_driver Empathy
## BT1 0.754 0.000 0.000
## BT2 0.763 0.000 0.000
## BT3 0.599 0.000 0.000
## BT4 0.719 0.000 0.000
## BT5 0.750 0.000 0.000
## BT6 0.755 0.000 0.000
## BT7 0.738 0.000 0.000
## BD1 0.000 0.828 0.000
## BD2 0.000 0.826 0.000
## BD3 0.000 0.858 0.000
## BD4 0.000 0.828 0.000
## EMP1 0.000 0.000 0.768
## EMP2 0.000 0.000 0.799
## EMP3 0.000 0.000 0.699
## EMP4 0.000 0.000 0.794
## EMP5 0.000 0.000 0.762
## EP1 0.000 0.000 0.000
## EP2 0.000 0.000 0.000
## EP3 0.000 0.000 0.000
## EP4 0.000 0.000 0.000
## CS1 0.000 0.000 0.000
## CS2 0.000 0.000 0.000
## CS3 0.000 0.000 0.000
## LS1 0.000 0.000 0.000
## LS2 0.000 0.000 0.000
## LS3 0.000 0.000 0.000
## LS4 0.000 0.000 0.000
## LS5 0.000 0.000 0.000
## Bus_tangible*Bus_driver_intxn -0.000 -0.000 -0.000
## Eniromental_performance customer_satisfaction
## BT1 0.000 0.000
## BT2 0.000 0.000
## BT3 0.000 0.000
## BT4 0.000 0.000
## BT5 0.000 0.000
## BT6 0.000 0.000
## BT7 0.000 0.000
## BD1 0.000 0.000
## BD2 0.000 0.000
## BD3 0.000 0.000
## BD4 0.000 0.000
## EMP1 0.000 0.000
## EMP2 0.000 0.000
## EMP3 0.000 0.000
## EMP4 0.000 0.000
## EMP5 0.000 0.000
## EP1 0.905 0.000
## EP2 0.947 0.000
## EP3 0.875 0.000
## EP4 0.866 0.000
## CS1 0.000 0.944
## CS2 0.000 0.960
## CS3 0.000 0.934
## LS1 0.000 0.000
## LS2 0.000 0.000
## LS3 0.000 0.000
## LS4 0.000 0.000
## LS5 0.000 0.000
## Bus_tangible*Bus_driver_intxn -0.000 -0.000
## Bus_tangible*Bus_driver Life_satisfaction
## BT1 -0.000 0.000
## BT2 -0.000 0.000
## BT3 -0.000 0.000
## BT4 -0.000 0.000
## BT5 -0.000 0.000
## BT6 -0.000 0.000
## BT7 -0.000 0.000
## BD1 -0.000 0.000
## BD2 -0.000 0.000
## BD3 -0.000 0.000
## BD4 -0.000 0.000
## EMP1 0.000 0.000
## EMP2 -0.000 0.000
## EMP3 -0.000 0.000
## EMP4 -0.000 0.000
## EMP5 -0.000 0.000
## EP1 -0.000 0.000
## EP2 -0.000 0.000
## EP3 -0.000 0.000
## EP4 -0.000 0.000
## CS1 -0.000 0.000
## CS2 -0.000 0.000
## CS3 -0.000 0.000
## LS1 0.000 0.876
## LS2 -0.000 0.918
## LS3 -0.000 0.885
## LS4 -0.000 0.854
## LS5 -0.000 0.705
## Bus_tangible*Bus_driver_intxn 1.261 -0.000
#write.csv(x=summary_simple$loadings,file = "Factorsloadings.csv")
#cross_loadings
summary$crossloadings
## NULL
#inspect indicator reliability
summary$loadings^2
## Bus_tangible Bus_driver Empathy
## BT1 0.569 0.000 0.000
## BT2 0.582 0.000 0.000
## BT3 0.359 0.000 0.000
## BT4 0.517 0.000 0.000
## BT5 0.562 0.000 0.000
## BT6 0.569 0.000 0.000
## BT7 0.544 0.000 0.000
## BD1 0.000 0.685 0.000
## BD2 0.000 0.683 0.000
## BD3 0.000 0.737 0.000
## BD4 0.000 0.685 0.000
## EMP1 0.000 0.000 0.590
## EMP2 0.000 0.000 0.638
## EMP3 0.000 0.000 0.488
## EMP4 0.000 0.000 0.631
## EMP5 0.000 0.000 0.581
## EP1 0.000 0.000 0.000
## EP2 0.000 0.000 0.000
## EP3 0.000 0.000 0.000
## EP4 0.000 0.000 0.000
## CS1 0.000 0.000 0.000
## CS2 0.000 0.000 0.000
## CS3 0.000 0.000 0.000
## LS1 0.000 0.000 0.000
## LS2 0.000 0.000 0.000
## LS3 0.000 0.000 0.000
## LS4 0.000 0.000 0.000
## LS5 0.000 0.000 0.000
## Bus_tangible*Bus_driver_intxn 0.000 0.000 0.000
## Eniromental_performance customer_satisfaction
## BT1 0.000 0.000
## BT2 0.000 0.000
## BT3 0.000 0.000
## BT4 0.000 0.000
## BT5 0.000 0.000
## BT6 0.000 0.000
## BT7 0.000 0.000
## BD1 0.000 0.000
## BD2 0.000 0.000
## BD3 0.000 0.000
## BD4 0.000 0.000
## EMP1 0.000 0.000
## EMP2 0.000 0.000
## EMP3 0.000 0.000
## EMP4 0.000 0.000
## EMP5 0.000 0.000
## EP1 0.819 0.000
## EP2 0.896 0.000
## EP3 0.766 0.000
## EP4 0.750 0.000
## CS1 0.000 0.892
## CS2 0.000 0.922
## CS3 0.000 0.871
## LS1 0.000 0.000
## LS2 0.000 0.000
## LS3 0.000 0.000
## LS4 0.000 0.000
## LS5 0.000 0.000
## Bus_tangible*Bus_driver_intxn 0.000 0.000
## Bus_tangible*Bus_driver Life_satisfaction
## BT1 0.000 0.000
## BT2 0.000 0.000
## BT3 0.000 0.000
## BT4 0.000 0.000
## BT5 0.000 0.000
## BT6 0.000 0.000
## BT7 0.000 0.000
## BD1 0.000 0.000
## BD2 0.000 0.000
## BD3 0.000 0.000
## BD4 0.000 0.000
## EMP1 0.000 0.000
## EMP2 0.000 0.000
## EMP3 0.000 0.000
## EMP4 0.000 0.000
## EMP5 0.000 0.000
## EP1 0.000 0.000
## EP2 0.000 0.000
## EP3 0.000 0.000
## EP4 0.000 0.000
## CS1 0.000 0.000
## CS2 0.000 0.000
## CS3 0.000 0.000
## LS1 0.000 0.767
## LS2 0.000 0.842
## LS3 0.000 0.783
## LS4 0.000 0.730
## LS5 0.000 0.497
## Bus_tangible*Bus_driver_intxn 1.591 0.000
#write.csv(x=summary$loadings^2,file="reliability.csv")
#FL criteria
summary$fl_criteria
## NULL
#vif
summary$validity$vifitems
## NULL
summary$paths
## customer_satisfaction Life_satisfaction
## R^2 0.447 0.123
## AdjR^2 0.439 0.110
## Bus_tangible 0.181 0.225
## Bus_driver 0.143 0.047
## Empathy 0.307 .
## Eniromental_performance 0.231 .
## customer_satisfaction . 0.141
## Bus_tangible*Bus_driver . 0.007
summary$validity$fl_criteria
## Bus_tangible Bus_driver Empathy Eniromental_performance
## Bus_tangible 0.727 . . .
## Bus_driver 0.592 0.835 . .
## Empathy 0.407 0.524 0.765 .
## Eniromental_performance 0.508 0.421 0.380 0.899
## customer_satisfaction 0.508 0.509 0.544 0.500
## Bus_tangible*Bus_driver -0.202 -0.253 -0.074 -0.075
## Life_satisfaction 0.323 0.250 0.237 0.293
## customer_satisfaction Bus_tangible*Bus_driver
## Bus_tangible . .
## Bus_driver . .
## Empathy . .
## Eniromental_performance . .
## customer_satisfaction 0.946 .
## Bus_tangible*Bus_driver -0.114 1.000
## Life_satisfaction 0.278 -0.065
## Life_satisfaction
## Bus_tangible .
## Bus_driver .
## Empathy .
## Eniromental_performance .
## customer_satisfaction .
## Bus_tangible*Bus_driver .
## Life_satisfaction 0.851
##
## FL Criteria table reports square root of AVE on the diagonal and construct correlations on the lower triangle.
#htmt
summary$validity$htmt
## Bus_tangible Bus_driver Empathy Eniromental_performance
## Bus_tangible . . . .
## Bus_driver 0.689 . . .
## Empathy 0.467 0.606 . .
## Eniromental_performance 0.577 0.470 0.424 .
## customer_satisfaction 0.564 0.565 0.596 0.532
## Bus_tangible*Bus_driver 0.212 0.274 0.090 0.078
## Life_satisfaction 0.356 0.279 0.262 0.320
## customer_satisfaction Bus_tangible*Bus_driver
## Bus_tangible . .
## Bus_driver . .
## Empathy . .
## Eniromental_performance . .
## customer_satisfaction . .
## Bus_tangible*Bus_driver 0.118 .
## Life_satisfaction 0.300 0.085
## Life_satisfaction
## Bus_tangible .
## Bus_driver .
## Empathy .
## Eniromental_performance .
## customer_satisfaction .
## Bus_tangible*Bus_driver .
## Life_satisfaction .
plot(estimate)
bootstrap
boot<-bootstrap_model(seminr_model = estimate,nboot = 1000,cores = NULL,seed = 123)
## Bootstrapping model using seminr...
## SEMinR Model successfully bootstrapped
#summary
summary_boot<-summary(boot)
summary_boot
##
## Results from Bootstrap resamples: 1000
##
## Bootstrapped Structural Paths:
## Original Est. Bootstrap Mean
## Bus_tangible -> customer_satisfaction 0.181 0.187
## Bus_tangible -> Life_satisfaction 0.225 0.235
## Bus_driver -> customer_satisfaction 0.143 0.138
## Bus_driver -> Life_satisfaction 0.047 0.046
## Empathy -> customer_satisfaction 0.307 0.311
## Eniromental_performance -> customer_satisfaction 0.231 0.230
## customer_satisfaction -> Life_satisfaction 0.141 0.140
## Bus_tangible*Bus_driver -> Life_satisfaction 0.007 0.004
## Bootstrap SD T Stat. 2.5% CI
## Bus_tangible -> customer_satisfaction 0.067 2.698 0.046
## Bus_tangible -> Life_satisfaction 0.082 2.741 0.073
## Bus_driver -> customer_satisfaction 0.075 1.911 -0.010
## Bus_driver -> Life_satisfaction 0.090 0.525 -0.140
## Empathy -> customer_satisfaction 0.069 4.441 0.166
## Eniromental_performance -> customer_satisfaction 0.053 4.334 0.120
## customer_satisfaction -> Life_satisfaction 0.070 2.001 0.004
## Bus_tangible*Bus_driver -> Life_satisfaction 0.062 0.108 -0.123
## 97.5% CI
## Bus_tangible -> customer_satisfaction 0.317
## Bus_tangible -> Life_satisfaction 0.395
## Bus_driver -> customer_satisfaction 0.288
## Bus_driver -> Life_satisfaction 0.228
## Empathy -> customer_satisfaction 0.439
## Eniromental_performance -> customer_satisfaction 0.330
## customer_satisfaction -> Life_satisfaction 0.275
## Bus_tangible*Bus_driver -> Life_satisfaction 0.120
##
## Bootstrapped Weights:
## Original Est.
## BT1 -> Bus_tangible 0.191
## BT2 -> Bus_tangible 0.217
## BT3 -> Bus_tangible 0.137
## BT4 -> Bus_tangible 0.206
## BT5 -> Bus_tangible 0.181
## BT6 -> Bus_tangible 0.212
## BT7 -> Bus_tangible 0.223
## BD1 -> Bus_driver 0.280
## BD2 -> Bus_driver 0.297
## BD3 -> Bus_driver 0.317
## BD4 -> Bus_driver 0.303
## EMP1 -> Empathy 0.236
## EMP2 -> Empathy 0.307
## EMP3 -> Empathy 0.185
## EMP4 -> Empathy 0.251
## EMP5 -> Empathy 0.321
## EP1 -> Eniromental_performance 0.241
## EP2 -> Eniromental_performance 0.282
## EP3 -> Eniromental_performance 0.314
## EP4 -> Eniromental_performance 0.277
## CS1 -> customer_satisfaction 0.355
## CS2 -> customer_satisfaction 0.370
## CS3 -> customer_satisfaction 0.332
## LS1 -> Life_satisfaction 0.238
## LS2 -> Life_satisfaction 0.260
## LS3 -> Life_satisfaction 0.255
## LS4 -> Life_satisfaction 0.222
## LS5 -> Life_satisfaction 0.195
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 1.000
## Bootstrap Mean
## BT1 -> Bus_tangible 0.191
## BT2 -> Bus_tangible 0.217
## BT3 -> Bus_tangible 0.137
## BT4 -> Bus_tangible 0.206
## BT5 -> Bus_tangible 0.181
## BT6 -> Bus_tangible 0.212
## BT7 -> Bus_tangible 0.222
## BD1 -> Bus_driver 0.282
## BD2 -> Bus_driver 0.296
## BD3 -> Bus_driver 0.316
## BD4 -> Bus_driver 0.303
## EMP1 -> Empathy 0.236
## EMP2 -> Empathy 0.309
## EMP3 -> Empathy 0.184
## EMP4 -> Empathy 0.251
## EMP5 -> Empathy 0.322
## EP1 -> Eniromental_performance 0.240
## EP2 -> Eniromental_performance 0.282
## EP3 -> Eniromental_performance 0.316
## EP4 -> Eniromental_performance 0.276
## CS1 -> customer_satisfaction 0.355
## CS2 -> customer_satisfaction 0.370
## CS3 -> customer_satisfaction 0.332
## LS1 -> Life_satisfaction 0.240
## LS2 -> Life_satisfaction 0.259
## LS3 -> Life_satisfaction 0.253
## LS4 -> Life_satisfaction 0.225
## LS5 -> Life_satisfaction 0.192
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 1.000
## Bootstrap SD T Stat.
## BT1 -> Bus_tangible 0.020 9.429
## BT2 -> Bus_tangible 0.019 11.474
## BT3 -> Bus_tangible 0.024 5.736
## BT4 -> Bus_tangible 0.019 11.061
## BT5 -> Bus_tangible 0.020 9.171
## BT6 -> Bus_tangible 0.018 11.541
## BT7 -> Bus_tangible 0.019 11.500
## BD1 -> Bus_driver 0.021 13.504
## BD2 -> Bus_driver 0.021 14.178
## BD3 -> Bus_driver 0.022 14.316
## BD4 -> Bus_driver 0.020 14.812
## EMP1 -> Empathy 0.024 9.840
## EMP2 -> Empathy 0.026 11.760
## EMP3 -> Empathy 0.028 6.562
## EMP4 -> Empathy 0.026 9.580
## EMP5 -> Empathy 0.029 11.104
## EP1 -> Eniromental_performance 0.017 13.767
## EP2 -> Eniromental_performance 0.013 21.609
## EP3 -> Eniromental_performance 0.025 12.337
## EP4 -> Eniromental_performance 0.025 10.911
## CS1 -> customer_satisfaction 0.009 37.889
## CS2 -> customer_satisfaction 0.010 35.724
## CS3 -> customer_satisfaction 0.010 33.749
## LS1 -> Life_satisfaction 0.027 8.830
## LS2 -> Life_satisfaction 0.022 11.728
## LS3 -> Life_satisfaction 0.024 10.797
## LS4 -> Life_satisfaction 0.029 7.670
## LS5 -> Life_satisfaction 0.036 5.477
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 0.000 .
## 2.5% CI 97.5% CI
## BT1 -> Bus_tangible 0.154 0.231
## BT2 -> Bus_tangible 0.180 0.254
## BT3 -> Bus_tangible 0.090 0.183
## BT4 -> Bus_tangible 0.171 0.244
## BT5 -> Bus_tangible 0.142 0.220
## BT6 -> Bus_tangible 0.178 0.252
## BT7 -> Bus_tangible 0.185 0.259
## BD1 -> Bus_driver 0.240 0.324
## BD2 -> Bus_driver 0.256 0.340
## BD3 -> Bus_driver 0.276 0.362
## BD4 -> Bus_driver 0.264 0.345
## EMP1 -> Empathy 0.188 0.281
## EMP2 -> Empathy 0.260 0.365
## EMP3 -> Empathy 0.125 0.233
## EMP4 -> Empathy 0.201 0.304
## EMP5 -> Empathy 0.271 0.385
## EP1 -> Eniromental_performance 0.201 0.272
## EP2 -> Eniromental_performance 0.257 0.307
## EP3 -> Eniromental_performance 0.272 0.373
## EP4 -> Eniromental_performance 0.229 0.330
## CS1 -> customer_satisfaction 0.337 0.374
## CS2 -> customer_satisfaction 0.351 0.392
## CS3 -> customer_satisfaction 0.313 0.351
## LS1 -> Life_satisfaction 0.191 0.300
## LS2 -> Life_satisfaction 0.216 0.301
## LS3 -> Life_satisfaction 0.206 0.298
## LS4 -> Life_satisfaction 0.165 0.279
## LS5 -> Life_satisfaction 0.120 0.270
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 1.000 1.000
##
## Bootstrapped Loadings:
## Original Est.
## BT1 -> Bus_tangible 0.754
## BT2 -> Bus_tangible 0.763
## BT3 -> Bus_tangible 0.599
## BT4 -> Bus_tangible 0.719
## BT5 -> Bus_tangible 0.750
## BT6 -> Bus_tangible 0.755
## BT7 -> Bus_tangible 0.738
## BD1 -> Bus_driver 0.828
## BD2 -> Bus_driver 0.826
## BD3 -> Bus_driver 0.858
## BD4 -> Bus_driver 0.828
## EMP1 -> Empathy 0.768
## EMP2 -> Empathy 0.799
## EMP3 -> Empathy 0.699
## EMP4 -> Empathy 0.794
## EMP5 -> Empathy 0.762
## EP1 -> Eniromental_performance 0.905
## EP2 -> Eniromental_performance 0.947
## EP3 -> Eniromental_performance 0.875
## EP4 -> Eniromental_performance 0.866
## CS1 -> customer_satisfaction 0.944
## CS2 -> customer_satisfaction 0.960
## CS3 -> customer_satisfaction 0.934
## LS1 -> Life_satisfaction 0.876
## LS2 -> Life_satisfaction 0.918
## LS3 -> Life_satisfaction 0.885
## LS4 -> Life_satisfaction 0.854
## LS5 -> Life_satisfaction 0.705
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 1.261
## Bootstrap Mean
## BT1 -> Bus_tangible 0.751
## BT2 -> Bus_tangible 0.762
## BT3 -> Bus_tangible 0.598
## BT4 -> Bus_tangible 0.719
## BT5 -> Bus_tangible 0.747
## BT6 -> Bus_tangible 0.753
## BT7 -> Bus_tangible 0.737
## BD1 -> Bus_driver 0.829
## BD2 -> Bus_driver 0.825
## BD3 -> Bus_driver 0.858
## BD4 -> Bus_driver 0.827
## EMP1 -> Empathy 0.767
## EMP2 -> Empathy 0.798
## EMP3 -> Empathy 0.696
## EMP4 -> Empathy 0.792
## EMP5 -> Empathy 0.761
## EP1 -> Eniromental_performance 0.903
## EP2 -> Eniromental_performance 0.946
## EP3 -> Eniromental_performance 0.876
## EP4 -> Eniromental_performance 0.865
## CS1 -> customer_satisfaction 0.944
## CS2 -> customer_satisfaction 0.960
## CS3 -> customer_satisfaction 0.933
## LS1 -> Life_satisfaction 0.876
## LS2 -> Life_satisfaction 0.917
## LS3 -> Life_satisfaction 0.884
## LS4 -> Life_satisfaction 0.854
## LS5 -> Life_satisfaction 0.703
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 1.253
## Bootstrap SD T Stat.
## BT1 -> Bus_tangible 0.034 22.152
## BT2 -> Bus_tangible 0.032 23.528
## BT3 -> Bus_tangible 0.054 11.051
## BT4 -> Bus_tangible 0.039 18.379
## BT5 -> Bus_tangible 0.034 22.157
## BT6 -> Bus_tangible 0.033 23.082
## BT7 -> Bus_tangible 0.034 21.546
## BD1 -> Bus_driver 0.022 37.106
## BD2 -> Bus_driver 0.023 35.328
## BD3 -> Bus_driver 0.018 48.751
## BD4 -> Bus_driver 0.025 33.270
## EMP1 -> Empathy 0.030 25.348
## EMP2 -> Empathy 0.027 29.793
## EMP3 -> Empathy 0.042 16.774
## EMP4 -> Empathy 0.030 26.110
## EMP5 -> Empathy 0.029 26.165
## EP1 -> Eniromental_performance 0.018 49.134
## EP2 -> Eniromental_performance 0.009 100.290
## EP3 -> Eniromental_performance 0.019 44.909
## EP4 -> Eniromental_performance 0.027 31.559
## CS1 -> customer_satisfaction 0.012 79.329
## CS2 -> customer_satisfaction 0.007 141.910
## CS3 -> customer_satisfaction 0.015 61.059
## LS1 -> Life_satisfaction 0.021 42.010
## LS2 -> Life_satisfaction 0.014 64.170
## LS3 -> Life_satisfaction 0.028 31.955
## LS4 -> Life_satisfaction 0.021 39.781
## LS5 -> Life_satisfaction 0.046 15.211
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 0.089 14.192
## 2.5% CI 97.5% CI
## BT1 -> Bus_tangible 0.681 0.812
## BT2 -> Bus_tangible 0.694 0.818
## BT3 -> Bus_tangible 0.490 0.698
## BT4 -> Bus_tangible 0.634 0.791
## BT5 -> Bus_tangible 0.675 0.810
## BT6 -> Bus_tangible 0.687 0.813
## BT7 -> Bus_tangible 0.663 0.797
## BD1 -> Bus_driver 0.783 0.868
## BD2 -> Bus_driver 0.775 0.865
## BD3 -> Bus_driver 0.821 0.888
## BD4 -> Bus_driver 0.773 0.870
## EMP1 -> Empathy 0.703 0.820
## EMP2 -> Empathy 0.740 0.846
## EMP3 -> Empathy 0.610 0.771
## EMP4 -> Empathy 0.729 0.846
## EMP5 -> Empathy 0.699 0.814
## EP1 -> Eniromental_performance 0.863 0.933
## EP2 -> Eniromental_performance 0.924 0.961
## EP3 -> Eniromental_performance 0.837 0.910
## EP4 -> Eniromental_performance 0.805 0.913
## CS1 -> customer_satisfaction 0.918 0.963
## CS2 -> customer_satisfaction 0.945 0.971
## CS3 -> customer_satisfaction 0.900 0.959
## LS1 -> Life_satisfaction 0.829 0.910
## LS2 -> Life_satisfaction 0.884 0.941
## LS3 -> Life_satisfaction 0.819 0.926
## LS4 -> Life_satisfaction 0.808 0.891
## LS5 -> Life_satisfaction 0.594 0.786
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 1.080 1.423
##
## Bootstrapped HTMT:
## Original Est.
## Bus_tangible -> Bus_driver 0.689
## Bus_tangible -> Empathy 0.467
## Bus_tangible -> Eniromental_performance 0.577
## Bus_tangible -> customer_satisfaction 0.564
## Bus_tangible -> Bus_tangible*Bus_driver 0.212
## Bus_tangible -> Life_satisfaction 0.356
## Bus_driver -> Empathy 0.606
## Bus_driver -> Eniromental_performance 0.470
## Bus_driver -> customer_satisfaction 0.565
## Bus_driver -> Bus_tangible*Bus_driver 0.274
## Bus_driver -> Life_satisfaction 0.279
## Empathy -> Eniromental_performance 0.424
## Empathy -> customer_satisfaction 0.596
## Empathy -> Bus_tangible*Bus_driver 0.090
## Empathy -> Life_satisfaction 0.262
## Eniromental_performance -> customer_satisfaction 0.532
## Eniromental_performance -> Bus_tangible*Bus_driver 0.078
## Eniromental_performance -> Life_satisfaction 0.320
## customer_satisfaction -> Bus_tangible*Bus_driver 0.118
## customer_satisfaction -> Life_satisfaction 0.300
## Bus_tangible*Bus_driver -> Life_satisfaction 0.085
## Bootstrap Mean
## Bus_tangible -> Bus_driver 0.692
## Bus_tangible -> Empathy 0.469
## Bus_tangible -> Eniromental_performance 0.574
## Bus_tangible -> customer_satisfaction 0.566
## Bus_tangible -> Bus_tangible*Bus_driver 0.216
## Bus_tangible -> Life_satisfaction 0.361
## Bus_driver -> Empathy 0.609
## Bus_driver -> Eniromental_performance 0.468
## Bus_driver -> customer_satisfaction 0.567
## Bus_driver -> Bus_tangible*Bus_driver 0.272
## Bus_driver -> Life_satisfaction 0.280
## Empathy -> Eniromental_performance 0.425
## Empathy -> customer_satisfaction 0.597
## Empathy -> Bus_tangible*Bus_driver 0.114
## Empathy -> Life_satisfaction 0.268
## Eniromental_performance -> customer_satisfaction 0.531
## Eniromental_performance -> Bus_tangible*Bus_driver 0.091
## Eniromental_performance -> Life_satisfaction 0.317
## customer_satisfaction -> Bus_tangible*Bus_driver 0.123
## customer_satisfaction -> Life_satisfaction 0.300
## Bus_tangible*Bus_driver -> Life_satisfaction 0.102
## Bootstrap SD 2.5% CI
## Bus_tangible -> Bus_driver 0.054 0.579
## Bus_tangible -> Empathy 0.062 0.350
## Bus_tangible -> Eniromental_performance 0.049 0.476
## Bus_tangible -> customer_satisfaction 0.054 0.450
## Bus_tangible -> Bus_tangible*Bus_driver 0.087 0.073
## Bus_tangible -> Life_satisfaction 0.064 0.244
## Bus_driver -> Empathy 0.056 0.498
## Bus_driver -> Eniromental_performance 0.062 0.348
## Bus_driver -> customer_satisfaction 0.048 0.471
## Bus_driver -> Bus_tangible*Bus_driver 0.082 0.107
## Bus_driver -> Life_satisfaction 0.074 0.139
## Empathy -> Eniromental_performance 0.058 0.313
## Empathy -> customer_satisfaction 0.050 0.488
## Empathy -> Bus_tangible*Bus_driver 0.047 0.043
## Empathy -> Life_satisfaction 0.070 0.142
## Eniromental_performance -> customer_satisfaction 0.048 0.431
## Eniromental_performance -> Bus_tangible*Bus_driver 0.051 0.023
## Eniromental_performance -> Life_satisfaction 0.062 0.192
## customer_satisfaction -> Bus_tangible*Bus_driver 0.069 0.018
## customer_satisfaction -> Life_satisfaction 0.060 0.181
## Bus_tangible*Bus_driver -> Life_satisfaction 0.042 0.046
## 97.5% CI
## Bus_tangible -> Bus_driver 0.790
## Bus_tangible -> Empathy 0.590
## Bus_tangible -> Eniromental_performance 0.667
## Bus_tangible -> customer_satisfaction 0.663
## Bus_tangible -> Bus_tangible*Bus_driver 0.401
## Bus_tangible -> Life_satisfaction 0.489
## Bus_driver -> Empathy 0.716
## Bus_driver -> Eniromental_performance 0.583
## Bus_driver -> customer_satisfaction 0.661
## Bus_driver -> Bus_tangible*Bus_driver 0.432
## Bus_driver -> Life_satisfaction 0.423
## Empathy -> Eniromental_performance 0.535
## Empathy -> customer_satisfaction 0.684
## Empathy -> Bus_tangible*Bus_driver 0.223
## Empathy -> Life_satisfaction 0.416
## Eniromental_performance -> customer_satisfaction 0.623
## Eniromental_performance -> Bus_tangible*Bus_driver 0.210
## Eniromental_performance -> Life_satisfaction 0.437
## customer_satisfaction -> Bus_tangible*Bus_driver 0.262
## customer_satisfaction -> Life_satisfaction 0.416
## Bus_tangible*Bus_driver -> Life_satisfaction 0.205
##
## Bootstrapped Total Paths:
## Original Est. Bootstrap Mean
## Bus_tangible -> customer_satisfaction 0.181 0.187
## Bus_tangible -> Life_satisfaction 0.250 0.261
## Bus_driver -> customer_satisfaction 0.143 0.138
## Bus_driver -> Life_satisfaction 0.067 0.066
## Empathy -> customer_satisfaction 0.307 0.311
## Empathy -> Life_satisfaction 0.043 0.043
## Eniromental_performance -> customer_satisfaction 0.231 0.230
## Eniromental_performance -> Life_satisfaction 0.033 0.032
## customer_satisfaction -> Life_satisfaction 0.141 0.140
## Bus_tangible*Bus_driver -> Life_satisfaction 0.007 0.004
## Bootstrap SD 2.5% CI
## Bus_tangible -> customer_satisfaction 0.067 0.046
## Bus_tangible -> Life_satisfaction 0.079 0.106
## Bus_driver -> customer_satisfaction 0.075 -0.010
## Bus_driver -> Life_satisfaction 0.088 -0.113
## Empathy -> customer_satisfaction 0.069 0.166
## Empathy -> Life_satisfaction 0.024 0.001
## Eniromental_performance -> customer_satisfaction 0.053 0.120
## Eniromental_performance -> Life_satisfaction 0.018 0.001
## customer_satisfaction -> Life_satisfaction 0.070 0.004
## Bus_tangible*Bus_driver -> Life_satisfaction 0.062 -0.123
## 97.5% CI
## Bus_tangible -> customer_satisfaction 0.317
## Bus_tangible -> Life_satisfaction 0.418
## Bus_driver -> customer_satisfaction 0.288
## Bus_driver -> Life_satisfaction 0.242
## Empathy -> customer_satisfaction 0.439
## Empathy -> Life_satisfaction 0.093
## Eniromental_performance -> customer_satisfaction 0.330
## Eniromental_performance -> Life_satisfaction 0.069
## customer_satisfaction -> Life_satisfaction 0.275
## Bus_tangible*Bus_driver -> Life_satisfaction 0.120
#boot_paths
summary_boot$bootstrapped_paths
## Original Est. Bootstrap Mean
## Bus_tangible -> customer_satisfaction 0.181 0.187
## Bus_tangible -> Life_satisfaction 0.225 0.235
## Bus_driver -> customer_satisfaction 0.143 0.138
## Bus_driver -> Life_satisfaction 0.047 0.046
## Empathy -> customer_satisfaction 0.307 0.311
## Eniromental_performance -> customer_satisfaction 0.231 0.230
## customer_satisfaction -> Life_satisfaction 0.141 0.140
## Bus_tangible*Bus_driver -> Life_satisfaction 0.007 0.004
## Bootstrap SD T Stat. 2.5% CI
## Bus_tangible -> customer_satisfaction 0.067 2.698 0.046
## Bus_tangible -> Life_satisfaction 0.082 2.741 0.073
## Bus_driver -> customer_satisfaction 0.075 1.911 -0.010
## Bus_driver -> Life_satisfaction 0.090 0.525 -0.140
## Empathy -> customer_satisfaction 0.069 4.441 0.166
## Eniromental_performance -> customer_satisfaction 0.053 4.334 0.120
## customer_satisfaction -> Life_satisfaction 0.070 2.001 0.004
## Bus_tangible*Bus_driver -> Life_satisfaction 0.062 0.108 -0.123
## 97.5% CI
## Bus_tangible -> customer_satisfaction 0.317
## Bus_tangible -> Life_satisfaction 0.395
## Bus_driver -> customer_satisfaction 0.288
## Bus_driver -> Life_satisfaction 0.228
## Empathy -> customer_satisfaction 0.439
## Eniromental_performance -> customer_satisfaction 0.330
## customer_satisfaction -> Life_satisfaction 0.275
## Bus_tangible*Bus_driver -> Life_satisfaction 0.120
#boot loading
summary_boot$bootstrapped_loadings
## Original Est.
## BT1 -> Bus_tangible 0.754
## BT2 -> Bus_tangible 0.763
## BT3 -> Bus_tangible 0.599
## BT4 -> Bus_tangible 0.719
## BT5 -> Bus_tangible 0.750
## BT6 -> Bus_tangible 0.755
## BT7 -> Bus_tangible 0.738
## BD1 -> Bus_driver 0.828
## BD2 -> Bus_driver 0.826
## BD3 -> Bus_driver 0.858
## BD4 -> Bus_driver 0.828
## EMP1 -> Empathy 0.768
## EMP2 -> Empathy 0.799
## EMP3 -> Empathy 0.699
## EMP4 -> Empathy 0.794
## EMP5 -> Empathy 0.762
## EP1 -> Eniromental_performance 0.905
## EP2 -> Eniromental_performance 0.947
## EP3 -> Eniromental_performance 0.875
## EP4 -> Eniromental_performance 0.866
## CS1 -> customer_satisfaction 0.944
## CS2 -> customer_satisfaction 0.960
## CS3 -> customer_satisfaction 0.934
## LS1 -> Life_satisfaction 0.876
## LS2 -> Life_satisfaction 0.918
## LS3 -> Life_satisfaction 0.885
## LS4 -> Life_satisfaction 0.854
## LS5 -> Life_satisfaction 0.705
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 1.261
## Bootstrap Mean
## BT1 -> Bus_tangible 0.751
## BT2 -> Bus_tangible 0.762
## BT3 -> Bus_tangible 0.598
## BT4 -> Bus_tangible 0.719
## BT5 -> Bus_tangible 0.747
## BT6 -> Bus_tangible 0.753
## BT7 -> Bus_tangible 0.737
## BD1 -> Bus_driver 0.829
## BD2 -> Bus_driver 0.825
## BD3 -> Bus_driver 0.858
## BD4 -> Bus_driver 0.827
## EMP1 -> Empathy 0.767
## EMP2 -> Empathy 0.798
## EMP3 -> Empathy 0.696
## EMP4 -> Empathy 0.792
## EMP5 -> Empathy 0.761
## EP1 -> Eniromental_performance 0.903
## EP2 -> Eniromental_performance 0.946
## EP3 -> Eniromental_performance 0.876
## EP4 -> Eniromental_performance 0.865
## CS1 -> customer_satisfaction 0.944
## CS2 -> customer_satisfaction 0.960
## CS3 -> customer_satisfaction 0.933
## LS1 -> Life_satisfaction 0.876
## LS2 -> Life_satisfaction 0.917
## LS3 -> Life_satisfaction 0.884
## LS4 -> Life_satisfaction 0.854
## LS5 -> Life_satisfaction 0.703
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 1.253
## Bootstrap SD T Stat.
## BT1 -> Bus_tangible 0.034 22.152
## BT2 -> Bus_tangible 0.032 23.528
## BT3 -> Bus_tangible 0.054 11.051
## BT4 -> Bus_tangible 0.039 18.379
## BT5 -> Bus_tangible 0.034 22.157
## BT6 -> Bus_tangible 0.033 23.082
## BT7 -> Bus_tangible 0.034 21.546
## BD1 -> Bus_driver 0.022 37.106
## BD2 -> Bus_driver 0.023 35.328
## BD3 -> Bus_driver 0.018 48.751
## BD4 -> Bus_driver 0.025 33.270
## EMP1 -> Empathy 0.030 25.348
## EMP2 -> Empathy 0.027 29.793
## EMP3 -> Empathy 0.042 16.774
## EMP4 -> Empathy 0.030 26.110
## EMP5 -> Empathy 0.029 26.165
## EP1 -> Eniromental_performance 0.018 49.134
## EP2 -> Eniromental_performance 0.009 100.290
## EP3 -> Eniromental_performance 0.019 44.909
## EP4 -> Eniromental_performance 0.027 31.559
## CS1 -> customer_satisfaction 0.012 79.329
## CS2 -> customer_satisfaction 0.007 141.910
## CS3 -> customer_satisfaction 0.015 61.059
## LS1 -> Life_satisfaction 0.021 42.010
## LS2 -> Life_satisfaction 0.014 64.170
## LS3 -> Life_satisfaction 0.028 31.955
## LS4 -> Life_satisfaction 0.021 39.781
## LS5 -> Life_satisfaction 0.046 15.211
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 0.089 14.192
## 2.5% CI 97.5% CI
## BT1 -> Bus_tangible 0.681 0.812
## BT2 -> Bus_tangible 0.694 0.818
## BT3 -> Bus_tangible 0.490 0.698
## BT4 -> Bus_tangible 0.634 0.791
## BT5 -> Bus_tangible 0.675 0.810
## BT6 -> Bus_tangible 0.687 0.813
## BT7 -> Bus_tangible 0.663 0.797
## BD1 -> Bus_driver 0.783 0.868
## BD2 -> Bus_driver 0.775 0.865
## BD3 -> Bus_driver 0.821 0.888
## BD4 -> Bus_driver 0.773 0.870
## EMP1 -> Empathy 0.703 0.820
## EMP2 -> Empathy 0.740 0.846
## EMP3 -> Empathy 0.610 0.771
## EMP4 -> Empathy 0.729 0.846
## EMP5 -> Empathy 0.699 0.814
## EP1 -> Eniromental_performance 0.863 0.933
## EP2 -> Eniromental_performance 0.924 0.961
## EP3 -> Eniromental_performance 0.837 0.910
## EP4 -> Eniromental_performance 0.805 0.913
## CS1 -> customer_satisfaction 0.918 0.963
## CS2 -> customer_satisfaction 0.945 0.971
## CS3 -> customer_satisfaction 0.900 0.959
## LS1 -> Life_satisfaction 0.829 0.910
## LS2 -> Life_satisfaction 0.884 0.941
## LS3 -> Life_satisfaction 0.819 0.926
## LS4 -> Life_satisfaction 0.808 0.891
## LS5 -> Life_satisfaction 0.594 0.786
## Bus_tangible*Bus_driver_intxn -> Bus_tangible*Bus_driver 1.080 1.423
summary_boot$bootstrapped_HTMT
## Original Est.
## Bus_tangible -> Bus_driver 0.689
## Bus_tangible -> Empathy 0.467
## Bus_tangible -> Eniromental_performance 0.577
## Bus_tangible -> customer_satisfaction 0.564
## Bus_tangible -> Bus_tangible*Bus_driver 0.212
## Bus_tangible -> Life_satisfaction 0.356
## Bus_driver -> Empathy 0.606
## Bus_driver -> Eniromental_performance 0.470
## Bus_driver -> customer_satisfaction 0.565
## Bus_driver -> Bus_tangible*Bus_driver 0.274
## Bus_driver -> Life_satisfaction 0.279
## Empathy -> Eniromental_performance 0.424
## Empathy -> customer_satisfaction 0.596
## Empathy -> Bus_tangible*Bus_driver 0.090
## Empathy -> Life_satisfaction 0.262
## Eniromental_performance -> customer_satisfaction 0.532
## Eniromental_performance -> Bus_tangible*Bus_driver 0.078
## Eniromental_performance -> Life_satisfaction 0.320
## customer_satisfaction -> Bus_tangible*Bus_driver 0.118
## customer_satisfaction -> Life_satisfaction 0.300
## Bus_tangible*Bus_driver -> Life_satisfaction 0.085
## Bootstrap Mean
## Bus_tangible -> Bus_driver 0.692
## Bus_tangible -> Empathy 0.469
## Bus_tangible -> Eniromental_performance 0.574
## Bus_tangible -> customer_satisfaction 0.566
## Bus_tangible -> Bus_tangible*Bus_driver 0.216
## Bus_tangible -> Life_satisfaction 0.361
## Bus_driver -> Empathy 0.609
## Bus_driver -> Eniromental_performance 0.468
## Bus_driver -> customer_satisfaction 0.567
## Bus_driver -> Bus_tangible*Bus_driver 0.272
## Bus_driver -> Life_satisfaction 0.280
## Empathy -> Eniromental_performance 0.425
## Empathy -> customer_satisfaction 0.597
## Empathy -> Bus_tangible*Bus_driver 0.114
## Empathy -> Life_satisfaction 0.268
## Eniromental_performance -> customer_satisfaction 0.531
## Eniromental_performance -> Bus_tangible*Bus_driver 0.091
## Eniromental_performance -> Life_satisfaction 0.317
## customer_satisfaction -> Bus_tangible*Bus_driver 0.123
## customer_satisfaction -> Life_satisfaction 0.300
## Bus_tangible*Bus_driver -> Life_satisfaction 0.102
## Bootstrap SD T Stat.
## Bus_tangible -> Bus_driver 0.054 12.666
## Bus_tangible -> Empathy 0.062 7.497
## Bus_tangible -> Eniromental_performance 0.049 11.748
## Bus_tangible -> customer_satisfaction 0.054 10.407
## Bus_tangible -> Bus_tangible*Bus_driver 0.087 2.431
## Bus_tangible -> Life_satisfaction 0.064 5.568
## Bus_driver -> Empathy 0.056 10.815
## Bus_driver -> Eniromental_performance 0.062 7.602
## Bus_driver -> customer_satisfaction 0.048 11.681
## Bus_driver -> Bus_tangible*Bus_driver 0.082 3.355
## Bus_driver -> Life_satisfaction 0.074 3.785
## Empathy -> Eniromental_performance 0.058 7.338
## Empathy -> customer_satisfaction 0.050 11.875
## Empathy -> Bus_tangible*Bus_driver 0.047 1.913
## Empathy -> Life_satisfaction 0.070 3.727
## Eniromental_performance -> customer_satisfaction 0.048 10.992
## Eniromental_performance -> Bus_tangible*Bus_driver 0.051 1.525
## Eniromental_performance -> Life_satisfaction 0.062 5.183
## customer_satisfaction -> Bus_tangible*Bus_driver 0.069 1.706
## customer_satisfaction -> Life_satisfaction 0.060 4.984
## Bus_tangible*Bus_driver -> Life_satisfaction 0.042 2.002
## 2.5% CI 97.5% CI
## Bus_tangible -> Bus_driver 0.579 0.790
## Bus_tangible -> Empathy 0.350 0.590
## Bus_tangible -> Eniromental_performance 0.476 0.667
## Bus_tangible -> customer_satisfaction 0.450 0.663
## Bus_tangible -> Bus_tangible*Bus_driver 0.073 0.401
## Bus_tangible -> Life_satisfaction 0.244 0.489
## Bus_driver -> Empathy 0.498 0.716
## Bus_driver -> Eniromental_performance 0.348 0.583
## Bus_driver -> customer_satisfaction 0.471 0.661
## Bus_driver -> Bus_tangible*Bus_driver 0.107 0.432
## Bus_driver -> Life_satisfaction 0.139 0.423
## Empathy -> Eniromental_performance 0.313 0.535
## Empathy -> customer_satisfaction 0.488 0.684
## Empathy -> Bus_tangible*Bus_driver 0.043 0.223
## Empathy -> Life_satisfaction 0.142 0.416
## Eniromental_performance -> customer_satisfaction 0.431 0.623
## Eniromental_performance -> Bus_tangible*Bus_driver 0.023 0.210
## Eniromental_performance -> Life_satisfaction 0.192 0.437
## customer_satisfaction -> Bus_tangible*Bus_driver 0.018 0.262
## customer_satisfaction -> Life_satisfaction 0.181 0.416
## Bus_tangible*Bus_driver -> Life_satisfaction 0.046 0.205
plot(boot)
#Simple slope analysis plot
slope_analysis(moderated_model =estimate,dv="Life_satisfaction",moderator="Bus_driver",iv="Bus_tangible",leg_place="bottomright")