tidy_stats.psych: tidy_stats method for psych's alpha objects
In WillemSleegers/tidystats-v0.3: Create a Tidy Statistics Output File

Creates a tidystats data frame for a psych's alpha object.

1 2	## S3 method for class 'psych' tidy_stats(model, args = NULL)

`model`	An psych alpha object
`args`	Unused.

# Check if psych and dplyr packages are available
if(!requireNamespace("psych", quietly = TRUE)) {

  message(paste0("Package 'psych' is needed for this example to work. ",
                 "Please install it."), .call = FALSE)
} else {

  # Create an empty list to store results in
  results <- list()
 
  # Example: Cronbach's alpha
  alpha_agreeableness <- psych::bfi %>%
    dplyr::select(A1, A2, A3, A4, A5) %>%
    psych::alpha(check.keys = TRUE, warnings = FALSE)
 
  # Tidy stats
  tidy_stats(alpha_agreeableness)
 
  # Example: Correlations
  cors_agreeableness <- psych::bfi %>%
    dplyr::select(A1, A2, A3, A4, A5) %>%
    psych::corr.test()
 
  # Tidy stats
  tidy_stats(cors_agreeableness)
}