corentinchoisy/simul_these
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Created simirt.R

Browse Source
This commit is contained in:
Corentin Choisy
2023-12-26 09:10:36 +01:00
parent dcd679a5aa
commit 59bc529e70
2 changed files with 8 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

0
Modules/simirt.R Normal file
View File

2
Modules/simirt.ado
View File

@ -514,7 +514,7 @@ local names
forvalues d=1/`dim' { forvalues d=1/`dim' {
qui gen x`d'=invnorm(uniform()) qui gen x`d'=invnorm(uniform())
qui compress qui compress
local names `names' lt`d' local names `names' lt`d' /*En R: names <- c(names,paste('lt',d)) */
} }
matrix Chol=cholesky(corr(`covmatrix')) matrix Chol=cholesky(corr(`covmatrix'))