Displaying 1 result from an estimated 1 matches for "pzlepo".
Did you mean:
pzlepos
2010 Nov 03
3
optim works on command-line but not inside a function
...],params[2])))
-pos-neg
}
#IRT.p can also be espressed in terms of z and l
#where z=-ab and l=a <- makes it a standard logit function
IRT.pZL <- function(theta, z, l){
epow <- exp(-(z+l*theta))
result <- 1/(1+epow)
result
}
#as IRT.oneOverP but now for IRT.pZL
IRT.pZLepos <- function(theta, z, l){
epow <- exp(-(z+l*theta))
result <- (1+epow)
result
}
#as IRT.oneOverPneg but now for IRT.pZL
IRT.pZLeneg <- function(theta, z, l){
epow <- exp(z+l*theta)
result <- (1+epow)
result
}
#The loglikelihood of IRT, but now expr...