Displaying 2 results from an estimated 2 matches for "xvarsorted".
Did you mean:
yvarsorted
2009 Apr 21
6
Sampling in R
[This email is either empty or too large to be displayed at this time]
2009 Apr 22
2
Exporting objects plotted with plot3d() - rgl package
...iperm in 1:nperm) {
> XvarNew<-sample(Xvar, size=length(Xvar), replace=FALSE)
> YvarNew<-sample(Yvar, size=length(Yvar), replace=FALSE)
> perm.cor<-cor(XvarNew, YvarNew)
> Perm.Cor<-c(Perm.Cor, perm.cor)
> }
> print(max(Perm.Cor))
> XvarSorted<-sort(Xvar, decreasing=TRUE)
> YvarSorted<-sort(Yvar, decreasing=TRUE)
> max.cor<-cor(XvarSorted, YvarSorted)
> print(max.cor)
> if(mat.cor>0) Perm.Cor.Sorted<-sort(Perm.Cor, decreasing=TRUE)
> if(mat.cor<0) Perm.Cor.Sorted<-sort(Perm.Cor,...