> # calculate permutations
> perms = 10
> method = "hk"
> nodes = 1
>
> # get a list of phenotypes..
> phenos = as.data.frame(colnames(cross$pheno), stringsAsFactors=F)
> # don't include ID column..
> phenos = phenos[-1,]
>
> ptm <- proc.time()
> earlyqtlpermsscan1 = scanone(cross, pheno.col=phenos[1:2], method=method, n.perm=perms, n.cluster=nodes, addcovar=NULL, verbose=T)
Permutation 1
Permutation 2
Permutation 3
Permutation 4
Permutation 5
Permutation 6
Permutation 7
Permutation 8
Permutation 9
Permutation 10
> proc.time() - ptm
user system elapsed
6.067 2.563 8.651> ptm <- proc.time()
> earlyqtlpermsscan1 = scanone(cross, pheno.col=phenos[1:2], method=method, n.perm=perms, n.cluster=nodes, addcovar=NULL, verbose=T)
Permutation 1
Permutation 2
Permutation 3
Permutation 4
Permutation 5
Permutation 6
Permutation 7
Permutation 8
Permutation 9
Permutation 10
> proc.time() - ptm
user system elapsed
7.732 0.321 8.045
<simpleError in unclass(x)[repl, lodcolumn, drop = FALSE]: (subscript) logical subscript too long>You received this message because you are subscribed to a topic in the Google Groups "R/qtl discussion" group.
To unsubscribe from this topic, visit https://groups.google.com/d/topic/rqtl-disc/DTyaRFwq87I/unsubscribe.
To unsubscribe from this group and all its topics, send an email to rqtl-disc+...@googlegroups.com.
You received this message because you are subscribed to a topic in the Google Groups "R/qtl discussion" group.
To unsubscribe from this topic, visit https://groups.google.com/d/topic/rqtl-disc/DTyaRFwq87I/unsubscribe.
To unsubscribe from this group and all its topics, send an email to rqtl-disc+...@googlegroups.com.