search for: factorscor

...path="C:/NCME" setwd(path) #Using the function to generate the data GenData <- congeneric.sim(N=500, loads = c(1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1), short = FALSE) #Rounding upto 2 decimal places while showing the correlation matrix round(cor(GenData$observed),2) #Factor Score FactorScore=factor.pa(GenData$observed,1,scores = "TRUE", rotate="none") round(cor(FactorScore$scores,GenData$latent),2) (END) Please let me know if I am moving into the right direction, if not then, please let me know the correct way to simulate the dataset Thanks in Advance Regards,...

...SE) write.table(thresh.values,ThreshData,row.name=FALSE,col.name=FALSE) #####STACKING ALL THE OUTPUTS######### CommonFile <- stack(resp.prob) ###################################### #Rounding upto 2 decimal places while showing the correlation matrix round(cor(GenData$observed),2) #Factor Score FactorScore=factor.pa(GenData$observed,1,scores = "TRUE") round(cor(FactorScore$scores,GenData$latent),2) filename_fs <- paste("FactorScore_",k,".dat") #Exporting Factor Scores to Output file write.table(FactorScore$scores,filename_fs,col.name=FALSE, row.name=FALSE) } Thank...

...) write.table(thresh.values,ThreshData,row.name=FALSE,col.name=FALSE) #####STACKING ALL THE OUTPUTS######### CommonFile <- stack(resp.prob) ###################################### #Rounding upto 2 decimal places while showing the correlation matrix round(cor(GenData$observed),2) #Factor Score FactorScore=factor.pa(GenData$observed,1,scores = "TRUE") round(cor(FactorScore$scores,GenData$latent),2) filename_fs <- paste("FactorScore_",k,".dat") #Exporting Factor Scores to Output file write.table(FactorScore$scores,filename_fs,col.name=FALSE, row.name=FALSE) }

Hi All, I've been having a little trouble with creating a loop that will run a a series of t.tests for inspection, Below is the code i've tried, and some checks i've looked at. I've used the get(paste()) idea as i was told previously that the use of the eval should try and be avoided. I've run a single syntax to check that my systax is correct and works without any problems