R/is_granges.R

In RajLabMSSM/echodata: echoverse module: Fine-mapping data access and formatting

#' Is an object of class GRanges
#'
#' Check whether an object is of the class \link[GenomicRanges]{GRanges}.
#' @param obj Any R object.
#' @returns Boolean.
#' @export
#' @importFrom methods is
#' @examples 
#' bool <- echodata::is_granges(mtcars)
is_granges <- function(obj) {
    methods::is(obj, "GRanges")
}