## load datasets into a PROsetta_data object
data_asq <- loadData(
response = response_asq,
itemmap = itemmap_asq,
anchor = anchor_asq
)
## run descriptive statistics
runDescriptive(data_asq)
## run item parameter calibration on the response data, linking to the anchor item parameters
runLinking(data_asq, method = "FIXEDPAR")
Run the code above in your browser using DataLab