View source: R/functions_fetch.R
| stsFetchTsneInput | R Documentation |
retrieve data from series of either bigwig or bam files to a tidy data.table for later input to stsRunTsne
stsFetchTsneInput(
qdt,
qgr,
region_size = NULL,
file_format = NULL,
qwin = 50,
qmet = "summary",
cap_value = 20,
fetch_FUN = NULL,
agg_FUN = NULL,
high_on_right = TRUE,
bfc = BiocFileCache::BiocFileCache(),
n_cores = getOption("mc.cores", 1),
rname = digest::digest(list(qgr, qdt, qwin, qmet, fetch_FUN)),
force_overwrite = FALSE,
verbose = TRUE,
skip_checks = FALSE
)
qdt |
data.table containing, file, tall_var, wide_var, and optionally norm_factor |
qgr |
GRanges of regions to fetch |
region_size |
numeric, if provided will be used to set all widths on qgr. |
file_format |
character, describing file format. must be one of bam or bw. Will be automatically determined from file extension if NULL. |
qwin |
number of datapoints to use to view each region |
qmet |
strategy to use in each region, summary or sample |
cap_value |
maximum allowed value. useful for outlier handling. |
fetch_FUN |
function used to load and process data from files. |
agg_FUN |
function used to aggregate any duplicate tall_var+wide_var mappings in qdt. Should accept a numeric vector and return a single value. |
high_on_right |
if TRUE, profiles where highest signal is on the left are flipped. |
bfc |
BiocFileCache object to use to cache data |
n_cores |
number of cores to use. Defaults to value of mc.cores or 1 if mc.cores is not set. |
rname |
rname to use with cache. Default is a digest of arguments used to fetch data. |
force_overwrite |
if TRUE, any contents of cache are overwritten. Default is FALSE. |
verbose |
if TRUE outputs progress and log messages |
skip_checks |
if TRUE, tall_var and wide_var completeness checks are skipped. tall_var/wide_var combinations must be complete to run StsRunTsne(). Default is FALSE. |
validates inputs prepares query_gr fetches either bam or bigwig based on extension of first file transform and normalizes profiles after fetch
a tidy data.table of profile data.
data("query_gr")
bw_files = dir(system.file('extdata', package = "chiptsne"), pattern = ".bw$", full.names = TRUE)
cfg_dt = data.table(file = bw_files)
cfg_dt[, c("tall_var", "wide_var") := tstrsplit(basename(file), "_", keep = 1:2)]
cfg_dt = cfg_dt[tall_var %in% c("ESH1", "HUES48", "HUES64")]
cfg_dt[, norm_factor := ifelse(wide_var == "H3K4me3", .3, 1)]
profile_dt = stsFetchTsneInput(cfg_dt, query_gr)
profile_dt
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.