--
You received this message because you are subscribed to the Google Groups "OmegaPlus" group.
To unsubscribe from this group and stop receiving emails from it, send an email to omegaplus+...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.
assign.pvalues <- function(array){
#array <- sample(sw, 1000)
pvalues <- array(0, length(array))
ordered.indexes <- order(array)
j <- length(array)
for( i in ordered.indexes ){
pvalues[i] <- j/length(array)
j <- j-1
}
return(pvalues)
}
thr <- 0.05
sw.pval <- assign.pvalues(sw)
outliers <- which(sw.pval < thr)
my commnad is:
/work/student/yafei-mao/SweeD_v3.2.1_Linux/SweeD -name sc0000015.recode.vcf_vcf -input sc0000015.recode.vcf_vcf -grid 250 -folded
--
You received this message because you are subscribed to a topic in the Google Groups "OmegaPlus" group.
To unsubscribe from this topic, visit https://groups.google.com/d/topic/omegaplus/vuipyEWY7bI/unsubscribe.
To unsubscribe from this group and all its topics, send an email to omegaplus+...@googlegroups.com.