nItems<- 10
myItemsDeltaDot<- data.frame(
id= seq(nItems),
itemId= NA,
delta = runif(nItems, -4, 1) # nItems items in range -4,1
)
myItemsTau<- data.frame(
id = NA,
itemId = NA,
step = NA,
tau = NA # this is only needed because the function is...in progress
)
myAbilities<- rnorm(100, 1, 2) # 100 person, offset from items - poor targeting (?)
myItemsList<- conquestr::makeItemList(deltaDot = myItemsDeltaDot, tau = myItemsTau)
Run the code above in your browser using DataLab