[Rd] bug in outer() (PR#755)
mvondavier@ets.org
mvondavier@ets.org
Fri, 1 Dec 2000 20:47:32 +0100 (MET)
Full_Name: Matthias von Davier
Version: 1.1.1
OS: nt4.0
Submission from: (NULL) (144.81.31.148)
sim3pl <- function(theta,i) {
p2 <- p3pl(theta,i)
p1 <- runif(1)
temp <- response(p1,p2)
return(p1)
}
when calling outer(theta,items,sim3pl), where
theta = rnorm(100,m,s)
and
items = seq(1:nvar)
runif(1) is only called once (instead of 100*nvar times),
even though if calling sim3pl manually, it is working ok.
best regards,
Matthias von Davier
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !) To: r-devel-request@stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._