Ok, you're right -  may I rephrase:
How should I modify the assignment of result <- latentVariableNames
so it produces the output without the first line?
I thought result <- NULL should do the job, but it didn't because of the
following names(result) assignment (which I understand, but not how I
can workaround it).

Here's the output and code again:

  latentVariable   Indiv Group
1      rPlanning rIterat  rTDD
2      rPlanning    0.79  0.84
3        rIterat    0.79  0.83
4           rTDD     0.9  0.96
5       rStandup    0.83  0.82
6        rRetros     0.9  0.95
7        rAccess    0.91  0.92
8       rAccTest    0.87   0.9

#####
LV <- c("rPlanning", "rIterat", "rTDD", "rStandup", "rRetros", "rAccess",
"rAccTest")
#####
loopCronbach <- function(latentVariableNames, groupingVariable)
{
result <- latentVariableNames
names(result) <- c("latentVariable", "Indiv", "Group")
 for (currentName in latentVariableNames)
{
print(currentName)
print(result)
tmp1 <- calculateIndividualCronbach(get(currentName))
tmp2 <- calculateGroupCronbach(get(currentName), groupingVariable)
result <- rbind(result,data.frame(latentVariable=currentName,
Indiv=tmp1,Group=tmp2))
}
return(result)
}

On Thu, Feb 11, 2010 at 3:31 AM, jim holtman <jholtman@gmail.com> wrote:

> It doing exactly what you asked it to do.  You have the assignment:
>
> result <- latentVariableNames
>
> and then you print it out in the loop.  What were you expecting?
>
> On Wed, Feb 10, 2010 at 9:06 PM, Chaehan So <chaehan.so@gmail.com> wrote:
> > Dear r-helpers,
> >
> > why do I get an output in the first iteration of the for-loop
> > which contains the string values of the input vector,
> > and how can I avoid that?
> >
> > Here's the output (only line 1 is wrong)
> >
> >  latentVariable   Indiv Group
> > 1      rPlanning rIterat  rTDD
> > 2      rPlanning    0.79  0.84
> > 3        rIterat    0.79  0.83
> > 4           rTDD     0.9  0.96
> > 5       rStandup    0.83  0.82
> > 6        rRetros     0.9  0.95
> > 7        rAccess    0.91  0.92
> > 8       rAccTest    0.87   0.9
> >
> > #####
> > LV <- c("rPlanning", "rIterat", "rTDD", "rStandup", "rRetros", "rAccess",
> > "rAccTest")
> > #####
> > loopCronbach <- function(latentVariableNames, groupingVariable)
> > {
> > result <- latentVariableNames
> > names(result) <- c("latentVariable", "Indiv", "Group")
> >  for (currentName in latentVariableNames)
> > {
> > print(currentName)
> > print(result)
> > tmp1 <- calculateIndividualCronbach(get(currentName))
> > tmp2 <- calculateGroupCronbach(get(currentName), groupingVariable)
> > result <- rbind(result,data.frame(latentVariable=currentName,
> > Indiv=tmp1,Group=tmp2))
> > }
> > return(result)
> > }
> >
> >
> > a <- loopCronbach(LV, u_proj)
> >
> >        [[alternative HTML version deleted]]
> >
> > ______________________________________________
> > R-help@r-project.org mailing list
> > https://stat.ethz.ch/mailman/listinfo/r-help
> > PLEASE do read the posting guide
> http://www.R-project.org/posting-guide.html
> > and provide commented, minimal, self-contained, reproducible code.
> >
>
>
>
> --
> Jim Holtman
> Cincinnati, OH
> +1 513 646 9390
>
> What is the problem that you are trying to solve?
>



-- 
Humboldt University Berlin, Germany
Institute of Psychology
Rudower Chaussee 18, Room 1221
12489 Berlin
Germany
Office: +49 30 2093 - 9337
Mobile: +49 171- 626 9373

	[[alternative HTML version deleted]]

