eqsens_dt(dtab, filtgen = filtgen.maf.dist, by = c("pairs", "snps", "probes")[1],
targfdrs = c(0.05, 0.01, 0.005),
parmslist = list(mafs = c(0.025, 0.05, 0.075, 0.1, 0.125),
dists = c(1000, 5000, 10000, 25000, 50000, 1e+05)), renameChisq = TRUE)
filtgen.maf.dist (maf.dist, validate.tab = function(tab) all(c("mindist", "MAF", "score") %in% colnames(tab)))
update_fdr_filt(tab, filt = function(x) x, by = c("pairs", "snps", "probes")[1])
plotsens(eqsout, ylab = "count of eQTL at given FDR", title = "cis radius in bp")cisScores
GRanges. In general it will need to have column names score, MAF, mindist,
and columns with names permScore_1, ....
filtgen will be a function of one argument that filters
an input data.table. The environment of the returned function
will possess bindings used to define the filtering operation.
filtgen.maf.dist, documented here, is a working example.
by to "pairs". For sensitivity
analysis in which per-SNP associations are measured by choosing the
maximum association statistic for all genes cis to the SNP, set
by to "snps". For per-gene associations, with
scores maximized over all SNPs cis to genes, use "probes".
filtgen
cisScoresfilteqsens\_dt
eqsens_dt returns a data.frame instance with enumerations
of eQTL at various FDR thresholds for various settings of tuning
parametersupdate_fdr_filt revises (using pifdr) the fdr field of an input
data.table instance using variable
score as observed value, and permuted
values furnished by the variables named with permScore as
leading substring
## Not run:
# example(cisScores) # would generate f1
# names(f1) = NULL
# eqsens_dt( data.table(as(f1, "data.frame")) )
# ## End(Not run)
Run the code above in your browser using DataLab