which.suck.R
which.suck=function(vectors, dims){
if(dim>1){which(vectors<0.10 | vectors>0.4)
}else{which(vectors<0.30 | vectors>0.55)}
}
which.suck=function(vectors, dims){
if(dim>1){which(vectors<0.10 | vectors>0.4)
}else{which(vectors<0.30 | vectors>0.55)}
}