Nothing
## File Name: xxirt_compute_prob_item_from_x.R
## File Version: 0.03
xxirt_compute_prob_item_from_x <- function(x, em_args)
{
partable <- xxirt_partable_include_freeParameters( partable=em_args$partable,
x=x[ em_args$parindex_items ] )
probs_items <- xxirt_compute_itemprobs( item_list=em_args$item_list,
items=em_args$items, Theta=em_args$Theta,
ncat=em_args$ncat, partable=partable,
partable_index=em_args$partable_index )
return(probs_items)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.