# Loading the 'tcals' parameters
data(tcals)
# Item bank creation with 'tcals' item parameters
bank <- createItemBank(tcals)
# Random selection of 4 starting items
startItems(bank, seed=1, nrItems=4)
# Selection of the first 5 starting items
startItems(bank, fixItems=1:5)
# Selecting 1 starting item, initial ability estimate is 0
startItems(bank)
# Selecting 3 starting items, initial ability estimate is 1
# and half range is 2
startItems(bank, nrItems=3, theta=1, halfRange=2)
# Idem but with 'information' criterion
startItems(bank, nrItems=3, theta=1, halfRange=2, startSelect="MFI")
# Selecting 5 starting items, initial ability estimate is 2
# and half range is 3
startItems(bank, nrItems=5, theta=2, halfRange=3)
Run the code above in your browser using DataLab