# these RSES data can also be seen in self_confidence, the example data of
# this package
mydata <- input_manual_simple(
test_name = "RSES",
facet_names = c("Ns", "Ps"),
items_per_facet = 5,
item_names = c(2, 5, 6, 8, 9,
1, 3, 4, 7, 10),
test_loadings = c(.5806, .5907, .6179, .5899, .6559,
.6005, .4932, .4476, .5033, .6431),
facet_loadings = c(.6484, .6011, .6988, .6426, .6914,
.6422, .5835, .536, .5836, .6791),
correlation_matrix = matrix(data = c(1, .69,
.69, 1),
nrow = 2,
ncol = 2))
mydata
input_manual_process(mydata)
Run the code above in your browser using DataLab