From 6543f35a648bf2bd0597c506cfd17ab0205a5041 Mon Sep 17 00:00:00 2001 From: Gregory Jefferis Date: Mon, 11 Oct 2021 22:57:40 +0100 Subject: [PATCH] New ids.R source file --- R/ids.R | 3 +++ R/utils.R | 4 ---- 2 files changed, 3 insertions(+), 4 deletions(-) create mode 100644 R/ids.R diff --git a/R/ids.R b/R/ids.R new file mode 100644 index 0000000..8c9371d --- /dev/null +++ b/R/ids.R @@ -0,0 +1,3 @@ +valid_vfbids <- function(x) { + grepl("^VFB_[0-9A-z]{8}$", x, perl = T) +} diff --git a/R/utils.R b/R/utils.R index b8ccf26..0bbb319 100644 --- a/R/utils.R +++ b/R/utils.R @@ -28,7 +28,3 @@ null2na <- function(x, repl=NA) { if(length(y)==0) repl else y }) } - -valid_vfbids <- function(x) { - grepl("^VFB_[0-9A-z]{8}$", x, perl = T) -}