Wednesday, April 14, 2021

Reliability test in R

 #Calculating_Cronbach's Alpha

covid_concern<- alpha(data.frame(all[c("CO2", "CO3", "CO5", "CO7")]))

attitude<- alpha(data.frame(all[c("SN3", "PBC1", "PBC2")]))

social_norm<- alpha(data.frame(all[c("CO4", "AT7", "SN1", "SN2", "PMO1")]))

perc_beh_control<- alpha(data.frame(all[c("AT2", "AT4", "AT5", "AT6")]))

perc_mor_obligation<-alpha(data.frame(all[c("CO8", "AT1")]))

0 comments:

Post a Comment