Lusk,
if I were in your business, I would tackle such a problem with
help from a little formatting ...
e1=x1-mean(x1)
e2=x2-mean(x2)
n1=length(x1)
n2=length(x2)
N=(n1 + n2)
nu2=sum( c( ( x1 -mean(x1) )^2 , ( x2-mean(x2) )^2 ) )/N
ss=c(e1,e2)
b3=N*sum(ss^4)/(sum( ss^2)^2)
for(j in 1:B){ ss11=sample(x1, n1, replace=TRUE)
ss12=sample(x2, n2, replace=TRUE) }
... afterwards I'd correct for missing parenthesis and such. But I
understand that this approach was really not conducive when the
main intention was to target the public by giving the unhappy college
student who infelicitously bumped into a mountain of WWI-style
razor wire. The wire-cutter equivalent tool the R interpreter provides
you with is the question mark. Here are some examples how to use it:
?mean
?length
?sum
?sample
?"^"
?"for"
?"in"
?":"
?"="
?"-"
?"+"
?"*"
?"/"
Hope this helps.
Kind regards
On Friday 24 June 2011 15:31:44 Lusk Aris wrote:>
> Hi all,
> I need all your help on this. I have the next part of
code:............e1=x1-mean(x1)e2=x2-mean(x2)n1=length(x1)n2=length(x2N=(n1 +
n2)nu2=sum( c( ( x1 -mean(x1) )^2 , ( x2-mean(x2) )^2 ) )/Nss=c(e1,e2) b3=
N*sum(ss^4)/ (sum( ss^2)^2)............what do lines 6-8 (mathematical
notation)?Also the, what means part?............for(j in 1:B){ ss11=sample(x1,
n1, replace=TRUE) ss12=sample(x2, n2, replace=TRUE)
............}............????I would appreciate you could help on my inquiry,
and I am awaiting for your soon answer Thx in advance, Lusk
> [[alternative HTML version deleted]]
>
> ______________________________________________
> R-help at 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.