Displaying 1 result from an estimated 1 matches for "loopbii".
Did you mean:
loopbi
2009 Apr 06
3
how to subsample all possible combinations of n species taken 1:n at a time?
...r (loopbi in 1:dim(minor)[2])
{
minot[loopi,minor[loopi,loopbi]] <- 1
}
}
super<-rbind(super,minot)
rm(minot)
}
else
{
minot<-mat.or.vec(numsamples,n)
for (loopii in 1:numsamples)
{
thousand<-sample(dim(minor)[1],numsamples)
for (loopbii in 1:dim(minor)[2])
{
minot[loopii,minor[thousand[loopii],loopbii]] <- 1
}
}
super<-rbind(super,minot)
rm(minot)
}
}
super<-super[!rowSums(super)>n-1&!rowSums(super)<2,]
return(super)
}
samplecommunityD(11,1000)
So unless anyone knows of another...