search for: davood

Displaying 6 results from an estimated 6 matches for "davood".

2008 Mar 04
1
simulation study using R
...rforms analysis, and computes a statistic 1000 times. Therefore, for each condition, I will have 1000 statistic values. My question is what's the best way to store the 1000 statistic for each condition. Any suggestion on how to manage such simulation studies is greatly appreciated. Thanks, -- Davood Tofighi Department of Psychology Arizona State University [[alternative HTML version deleted]]
2008 Mar 04
0
simulation study using R [SEC=UNCLASSIFIED]
Davood, I developed an MC simulation model for wind hazard analysis last year. I found three important issues to increase efficiency: 1) Reuse most variables in each loop 2) Write results (1000 stats) to external files, perhaps one file for each condition. (a good ID for each file can be implemented usin...
2008 Mar 05
1
degrees of freedom extraction
Hello, II used the logLik() function to get the log-likelihood estimate of an object. The function also prints the degrees of freedom. How can I extract the degrees of freedom and assign it to a variable. Below is the output: > logLik(fit2pl) 'log Lik.' -4842.912 (df=36) Thanks, Davood Tofighi [[alternative HTML version deleted]]
2008 Mar 15
1
filehash
...en I ran the same code, I got the following error: > dbCreate("simdb") #create simdb database [1] TRUE > db<-dbInit("simdb") #initiate an object of database Error in sprintf(gettext(fmt, domain = domain), ...) : object "datafile" not found > Thanks, Davood [[alternative HTML version deleted]]
2008 Mar 10
1
ltm package question
Hello All, I was wondering how I can get the overall Pearson chi^2 test of model fit with its df and p value in the LTM package for the 2PL models. Thanks, -- Davood Tofighi Department of Psychology Arizona State University [[alternative HTML version deleted]]
2008 Mar 07
1
triple integral: adapt package question
...s of the other variables? require(adapt) fn<-function(z,y,x) {exp(x^3+y^4+x^2*y+x*z^2+y/z)} x<-runif(200);y<-runif(200);z<-runif(200); c1<-.5;c2<-5;M<-100; #M to represent infinity i1<-adapt(3,lo=c(.0001,0,0),up=c(M,c1*z,c2/y),functn=fn)$value print(i1); Thanks, -- Davood Tofighi [[alternative HTML version deleted]]