Identify the sources with the most annotations in the locus. Then only keep these sources.

XGR_filter_sources(gr.lib, n_top_sources = 1)

Arguments

gr.lib

Results from XGR_query.

n_top_sources

Number of top sources to include per library.

Examples

gr.filt <- echoannot::XGR_filter_sources(gr.lib = echoannot::xgr_example)