changed default theta estimation to wle in pcm
This commit is contained in:
2
R/pcm.R
2
R/pcm.R
@ -21,7 +21,7 @@
|
||||
#' @export
|
||||
|
||||
|
||||
pcm <- function(df=NULL,items=NULL,grp=NULL,dif.items=NULL,type.dif=NULL,weights=NULL,verbose=T,fit="ucminf",method.theta="eap",na.action=na.omit) {
|
||||
pcm <- function(df=NULL,items=NULL,grp=NULL,dif.items=NULL,type.dif=NULL,weights=NULL,verbose=T,fit="ucminf",method.theta="wle",na.action=na.omit) {
|
||||
##### Detecting errors
|
||||
|
||||
if (any(!(items %in% colnames(df)))) {
|
||||
|
@ -13,7 +13,7 @@ pcm(
|
||||
weights = NULL,
|
||||
verbose = T,
|
||||
fit = "ucminf",
|
||||
method.theta = "eap",
|
||||
method.theta = "wle",
|
||||
na.action = na.omit
|
||||
)
|
||||
}
|
||||
|
Reference in New Issue
Block a user