Commit 40100b33 authored by aditya.bhagwat's avatar aditya.bhagwat
Browse files

Create has_been_indexed()

parent df872c89
Pipeline #130813 passed with stages
in 31 seconds
......@@ -28,6 +28,7 @@ export(find_spacers)
export(genefile_to_granges)
export(genes_to_granges)
export(gr2dt)
export(has_been_indexed)
export(index_genome)
export(index_targets)
export(match_seqs)
......
......@@ -18,6 +18,17 @@ OUTDIR <- '~/multicrisprout'
spacer_fasta <- function(outdir = OUTDIR){
paste0(outdir, '/spacers.fa') }
#' Has been indexed?
#' @param bsgenome BSgenome
#' @param indexedgenomesir directory with indexed genomes
#' @examples
#' bsgenome <- BSgenome.Hsapiens.NCBI.GRCh38::BSgenome.Hsapiens.NCBI.GRCh38
#' has_been_indexed(bsgenome)
#' @export
has_been_indexed <- function(bsgenome, indexedgenomesdir = INDEXEDGENOMESDIR){
dir.exists(multicrispr:::genome_dir(bsgenome = bsgenome))
}
#' Index genome
#'
......
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/07_filter_specific.R
\name{has_been_indexed}
\alias{has_been_indexed}
\title{Has been indexed?}
\usage{
has_been_indexed(bsgenome, indexedgenomesdir = INDEXEDGENOMESDIR)
}
\arguments{
\item{bsgenome}{BSgenome}
\item{indexedgenomesir}{directory with indexed genomes}
}
\description{
Has been indexed?
}
\examples{
bsgenome <- BSgenome.Hsapiens.NCBI.GRCh38::BSgenome.Hsapiens.NCBI.GRCh38
has_been_indexed(bsgenome)
}
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment