Description Usage Arguments Examples
Used by GriegSmith function
1 | envelopes(iterations = 100, countdata, dimention)
|
iterations |
|
countdata |
|
dimention |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | ## The function is currently defined as
function(iterations=100,countdata,dimention){
## Randobly arrange the counts;
GSpermprev<-array();
for (i in 1:iterations){
perm<-matrix(sample(as.vector(countdata),size=2^(dimention*2),replace=FALSE),nrow=2^dimention,byrow=TRUE);
GSperm<-iterate(perm,dimention);
GSpermprev<-cbind(GSpermprev,GSperm[,3])
}
ret.val<-cbind(apply(GSpermprev[,-1],1,quantile,probs=c(.05)),apply(GSpermprev[,-1],1,quantile,probs=c(.95)))
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.