Displaying 1 result from an estimated 1 matches for "do_lm".
Did you mean:
do_ls
2010 Feb 15
1
argh .. if/else .. why?
...at(sprintf("Zelig for %d runs - timeR\n", RUNS))
} else
{
cat(sprintf("lme for %d runs - timeR\n", RUNS))
}
cat(date()," start - timeR\n")
for(i in 1:RUNS)
{
if (ZELIG) ##### if/else #3
do_Zelig()
else
do_lme()
cat(i, ' - ', date(),"\n")
}
cat(date()," end - timeR\n")
sink()