The goal of scripty is to help automate the specification and comparison of different generating psychometric models for indicators of psychological constructs. The package also aims to help researchers calculate scores based on their determined psychometric model for use in subsequent analyses. This package is very early in its development, so functionality is likely to expand/change dramatically/suddenly.
You can install the development version from GitHub with:
# install.packages("devtools")
devtools::install_github("jsakaluk/scripty")library(dplyr)
library(psych)
library(scripty)
data(bfi)
#Fit congeneric factor model to bfi agreeableness items
agree.mod <- congeneric(dplyr::select(bfi, A1:A5))
#Calculate H and Omega indexes of reliability:
reliability(agree.mod)
#Extract factor score for agreeableness as a predictor
bfi <- scoreit(dplyr::select(bfi, A1:A5), bfi, scorerole = "predictor")
#Preview first few A1:A5 and factor scores
head(select(bfi, A1:A5, out.score))