# NOT RUN {
## Read from data.frame:
itempool_science <- loadItemPool(itempool_science_data)
itemattrib_science <- loadItemAttrib(itemattrib_science_data, itempool_science)
## Read from file: write to tempdir() for illustration and clean afterwards
f <- file.path(tempdir(), "itemattrib_science.csv")
write.csv(itemattrib_science_data, f, row.names = FALSE)
itemattrib_science <- loadItemAttrib(f, itempool_science)
file.remove(f)
## TestDesign 1.1.0 - Deprecated arguments
# }
# NOT RUN {
loadItemAttrib(object = "iatt.csv", pool) # is equivalent to
loadItemAttrib(file = "iatt.csv", pool) # pre 1.1.0
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab