View source: R/simulateThetas.R View source: R/simulateThetas.R
simulateThetas | R Documentation |
Takes in response profiles from multiple respondents and multiple Cat object (i.e., adaptive battery) specifications and returns a set of theta estimates
simulateThetas(catObjs = list(), responses, return_adaptive = FALSE)
catObjs |
A list of |
responses |
A matrix of response profiles |
return_adaptive |
Boolean indicating if user wants dataframe containing only answers chosen via the adaptive design for each Cat object in catObjs list. |
The function takes multiple Cat
objects, stored in a list, and generates an estimation for theta
.
The function simulateThetas
returns a dataframe where each Cat
object corresponds to a column and each respondent
corresponds to a row if return_adaptive
is FALSE
, the default.
Optionally, simulateThetas
returns a list containing that dataframe plus dataframes
for the answer profiles simulated via each adaptive design if return_adaptive
is TRUE
.
Haley Acevedo, Ryden Butler, Josh W. Cutler, Matt Malis, Jacob M. Montgomery, Tom Wilkinson, Erin Rossiter, Min Hee Seo, Alex Weil, Jaerin Kim, Dominique Lockett
Cat-class
, apply
, selectItem
# Load Cat object data(grm_cat) # Simulate respondents respondents <- plyr::adply(.data = matrix(c(-1, 0, 1)), .margins = 1, .id = NULL, .fun = simulateRespondents, cat = grm_cat, n = 10) # A stopping rule (here, a common one) is required grm_cat@lengthThreshold <- 3 # Specify different adaptive inventory procedures grm_MAP <- grm_EAP <- grm_cat grm_MAP@estimation <- "MAP" grm_EAP@estimation <- "EAP" # List of Cat objects grmList <- list(cat1 = grm_MAP, cat2 = grm_EAP) # Results theta_est_results <- simulateThetas(catObjs = grmList, responses = respondents)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.