git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/OncoSimulR@109107 bc3139a8-67e5-0310-9ffc-ced21a209358
Ramon Diaz-Uriarte authored on 02/10/2015 14:45:05
| ... | ... |
@@ -6,9 +6,11 @@ p701 <- examplePosets[["p701"]] |
| 6 | 6 |
test_that("oncoSimulSample success with large num tries", {
|
| 7 | 7 |
## If nindiv small, sometimes you reach cancer at first try in every |
| 8 | 8 |
## indiv. |
| 9 |
- nindiv <- 500 |
|
| 9 |
+ nindiv <- 70 ## this is decreased to increase speed |
|
| 10 | 10 |
p1 <- oncoSimulSample(nindiv, p701, |
| 11 | 11 |
max.num.tries = 5000 * nindiv, |
| 12 |
+ sampleEvery = 0.3, ## this to avoid large N all |
|
| 13 |
+ ## of a sudden |
|
| 12 | 14 |
onlyCancer = TRUE) |
| 13 | 15 |
expect_true(p1$probCancer < 1) |
| 14 | 16 |
expect_true(p1$attemptsUsed > nindiv) |
| ... | ... |
@@ -1,15 +1,15 @@ |
| 1 | 1 |
\usepackage[% |
| 2 |
- shash={64e7888},
|
|
| 3 |
- lhash={64e788807673dc53fae66cf103085fd0b76cbe0c},
|
|
| 2 |
+ shash={b9add94},
|
|
| 3 |
+ lhash={b9add94a80c0037d5de904c87757f6a1ce79f444},
|
|
| 4 | 4 |
authname={Ramon Diaz-Uriarte (at Coleonyx)},
|
| 5 | 5 |
authemail={rdiaz02@gmail.com},
|
| 6 | 6 |
authsdate={2015-10-02},
|
| 7 |
- authidate={2015-10-02 12:15:15 +0200},
|
|
| 8 |
- authudate={1443780915},
|
|
| 7 |
+ authidate={2015-10-02 16:21:37 +0200},
|
|
| 8 |
+ authudate={1443795697},
|
|
| 9 | 9 |
commname={Ramon Diaz-Uriarte (at Coleonyx)},
|
| 10 | 10 |
commemail={rdiaz02@gmail.com},
|
| 11 | 11 |
commsdate={2015-10-02},
|
| 12 |
- commidate={2015-10-02 12:15:15 +0200},
|
|
| 13 |
- commudate={1443780915},
|
|
| 12 |
+ commidate={2015-10-02 16:21:37 +0200},
|
|
| 13 |
+ commudate={1443795697},
|
|
| 14 | 14 |
refnames={ (HEAD -> master)}
|
| 15 | 15 |
]{gitsetinfo}
|
| 16 | 16 |
\ No newline at end of file |