... | ... |
@@ -1561,6 +1561,11 @@ mirVariantPlot <- function(variantId, |
1561 | 1561 |
} |
1562 | 1562 |
} |
1563 | 1563 |
|
1564 |
+ ## ignore title if missing |
|
1565 |
+ if (is.null(title)) { |
|
1566 |
+ title <- "" |
|
1567 |
+ } |
|
1568 |
+ |
|
1564 | 1569 |
## create the trackplot object |
1565 | 1570 |
trackPlot <- Gviz::plotTracks(pList, |
1566 | 1571 |
extend.left = lf, |