Since we’ve already collected our properly reverse coded scale into a single data frame, we simply run the cronbach.alpha(dataframe, na.rm = TRUE) command on the dataframe and save it to a variable:

SDO_alpha <- cronbach.alpha(SDO, na.rm = TRUE)

Then, you can run the name of the variable to get the results:

SDO_alpha

## 
## Cronbach's alpha for the 'SDO' data-set
## 
## Items: 8
## Sample units: 89
## alpha: 0.911

Note: alpha scores above .7 are considered a good score.