## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  eval = FALSE
)

## -----------------------------------------------------------------------------
# if (!require("devtools")) {
#   install.packages("devtools")
# }
# devtools::install_github("jventural/OptimalFactor")

## -----------------------------------------------------------------------------
# library(OptimalFactor)
# 
# # Run EFA-Boosting
# result <- efa_boosting(
#   data = your_data,
#   name_items = "item",
#   n_factors = 3,
#   verbose = TRUE
# )
# 
# # View results
# print(result$final_structure)
# print(result$fit_indices)