Remove non-standard chromosomes from a list of GRanges objects.

filter_chrom(
  grlist,
  keep_chr = paste0("chr", c(seq_len(22), "X", "Y")),
  verbose = TRUE
)

Arguments

grlist

Named list of GRanges objects.

keep_chr

Which chromosomes to keep.

verbose

Print messages.

Value

Named list of GRanges objects.

Examples

gr <- GenomicRanges::GRanges(c("chr6:1-1000","chrUns999:1-1000"))
gr2 <- filter_chrom(grlist=gr)
#> Removing non-standard chromosomes.