R help - Apr 2008 - why my code is not computing significance level and power correctly

I am trying to compare Levene,bartlett, count5 tests for a random normal
sample for the significance level and power, the problem seems bug free but
with obvious wrong result, anyone can help, I send the R code as attachment.
Thanks http://www.nabble.com/file/p16992744/758%2Bproject 758+project 
-- 
View this message in context:
http://www.nabble.com/why-my-code-is-not-computing-significance-level-and-power-correctly-tp16992744p16992744.html
Sent from the R help mailing list archive at Nabble.com.