From d4a6c65d1c48da92211f8b27dc7d9d13e49654bd Mon Sep 17 00:00:00 2001
From: Simeon <51403284+simeross@users.noreply.github.com>
Date: Fri, 27 Oct 2023 09:47:40 +0200
Subject: [PATCH] test
---
NAMESPACE | 1 -
R/meshclustR.R | 3 +--
2 files changed, 1 insertion(+), 3 deletions(-)
diff --git a/NAMESPACE b/NAMESPACE
index 3b5b311..a87f056 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -50,7 +50,6 @@ import(DECIPHER)
import(GenomicRanges)
import(ape)
import(cowplot)
-import(dplyr)
import(ggdendro)
import(ggtree)
import(phangorn)
diff --git a/R/meshclustR.R b/R/meshclustR.R
index 529dd1a..53f2fc5 100644
--- a/R/meshclustR.R
+++ b/R/meshclustR.R
@@ -19,7 +19,6 @@
#' meshclustR(seqs = MyDNAStringSet, meshclust_bin = meshclust, filepath = path)
#' @import Biostrings
#' @import tidyverse
-#' @import dplyr
#' @export
meshclustR <- function(seqs = MyDNAStringSet,
meshclust_bin = meshclust,
@@ -42,7 +41,7 @@ meshclustR <- function(seqs = MyDNAStringSet,
col_names = c('cluster', 'seqnames',
'identity_with_center', 'cluster_class'),
col_types = 'fcdc') %>%
- mutate(seqnames = str_remove(seqnames, '>'))
+ dplyr::mutate(seqnames = str_remove(seqnames, '>'))
#clean up temp file and output file
file.remove(temp_file, out_file)
--
GitLab