| ... | ... |
@@ -21,7 +21,7 @@ setClass("GmapAlignerParam",
|
| 21 | 21 |
extra = "list")) |
| 22 | 22 |
|
| 23 | 23 |
setClass("GmapParam",
|
| 24 |
- representation(suboptimal_score = "integer", |
|
| 24 |
+ representation(suboptimal_score = "integer_OR_NULL", |
|
| 25 | 25 |
splicing = "logical", |
| 26 | 26 |
format = "character"), |
| 27 | 27 |
contains="GmapAlignerParam") |
| ... | ... |
@@ -31,7 +31,7 @@ setClass("GmapParam",
|
| 31 | 31 |
### |
| 32 | 32 |
|
| 33 | 33 |
GmapParam <- function(genome, unique_only = FALSE, |
| 34 |
- suboptimal_score = 0L, mode = "standard", |
|
| 34 |
+ suboptimal_score = NULL, mode = "standard", |
|
| 35 | 35 |
snps = NULL, |
| 36 | 36 |
npaths = if (unique_only) 1L else 100L, |
| 37 | 37 |
quiet_if_excessive = unique_only, nofails = unique_only, |
