diff --git a/DESCRIPTION b/DESCRIPTION index 0e3fd01..2150f07 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: mobileRNA Type: Package Title: mobileRNA: Investigate the RNA mobilome & population-scale changes -Version: 0.99.18 +Version: 0.99.19 Authors@R: c(person("Katie", "Jeynes-Cupper", email = "kej031@student.bham.ac.uk", role = c("aut", "cre"), comment = c(ORCID = "0009-0000-1350-1371")), diff --git a/R/RNAsequences.R b/R/RNAsequences.R index 0487cc0..b725b1e 100644 --- a/R/RNAsequences.R +++ b/R/RNAsequences.R @@ -107,6 +107,9 @@ RNAsequences <- function(data, original = FALSE, method = c("consensus", "set"), stop("data is missing. data must be an object of class matrix, data.frame, DataFrame") } + if (base::missing(method) || method %in% c("consensus", "set")) { + stop("Please specify the method parameter, must be either `consensus` or`set`. ") + } df <- data %>% # select only columns with RNA seqs, remove columns with only NA values dplyr::select(dplyr::starts_with("MajorRNA")) %>% dplyr::select(-dplyr::where(~all(. == "N"))) diff --git a/inst/NEWS.md b/inst/NEWS.md index a1761d0..0852a8c 100644 --- a/inst/NEWS.md +++ b/inst/NEWS.md @@ -1,3 +1,8 @@ +# mobileRNA 0.99.19 + +* Missing connective in RNAfeatures when using repeats variable. +* Added additional check for RNAsequences methods. + # mobileRNA 0.99.17 * Corrected ORCID references for authors