Displaying 3 results from an estimated 3 matches for "observedscores_data".
2009 Jan 28
1
stack data sets
...ng Threshold
thresh.values = .5 * beta.values
#Using the function to generate the Parallel Model CTT data
GenData <- congeneric.sim(N=500, loads = rep(.5,20), err=NULL, short = FALSE)
#Storing Observed Score in a variable
Observed_Scores = GenData[[3]]
#Exporting Observed scores to output file
ObservedScores_Data <- paste("Observed_Scores_",k,".dat")
write.table(Observed_Scores,ObservedScores_Data,row.name=FALSE,col.name=FALSE)
Zero = 0
One = 1
for (t in 1:20)
{
for (s in 1:500)
{
if (Observed_Scores[s,t]<= thresh.values[t])
resp.prob[s,t] = Zero
else
resp.prob[s,t] = One
}
}
Res...
2009 Jan 28
0
How to stack data sets?
...ng Threshold
thresh.values = .5 * beta.values
#Using the function to generate the Parallel Model CTT data
GenData <- congeneric.sim(N=500, loads = rep(.5,20), err=NULL, short = FALSE)
#Storing Observed Score in a variable
Observed_Scores = GenData[[3]]
#Exporting Observed scores to output file
ObservedScores_Data <- paste("Observed_Scores_",k,".dat")
write.table(Observed_Scores,ObservedScores_Data,row.name=FALSE,col.name=FALSE)
Zero = 0
One = 1
for (t in 1:20)
{
for (s in 1:500)
{
if (Observed_Scores[s,t]<= thresh.values[t])
resp.prob[s,t] = Zero
else
resp.prob[s,t] = One...
2009 Jan 28
2
t.test in a loop
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