resetMarFilter | R Documentation |
setMarFilter()
Remove "invalid" labels put on markers and make all markers valid.
resetMarFilter(object, ...)
## S4 method for signature 'GbsrGenotypeData'
resetMarFilter(object)
object |
A GbsrGenotypeData object. |
... |
Unused. |
A GbsrGenotypeData object after removing all filters on markers.
# Load data in the GDS file and instantiate a [GbsrGenotypeData] object.
gds_fn <- system.file("extdata", "sample.gds", package = "GBScleanR")
gds <- loadGDS(gds_fn)
# Check the number of markers.
nmar(gds)
# Summarize the information needed for filtering.
gds <- countGenotype(gds)
gds <- countRead(gds)
# filter out some markers meeting the criteria.
gds <- setMarFilter(gds,
id = getMarID(gds)[1:100],
missing = 0.2,
dp = c(5, Inf))
# Check the number of the retained markers.
nmar(gds)
# Reset all filters applied above.
gds <- resetMarFilter(gds)
# Check the number of the markers again.
nmar(gds)
# Close the connection to the GDS file.
closeGDS(gds)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.