print.FDX {FDX}

Printing FDX results

Description

Prints the results of discrete FDX analysis, stored in a FDX S3 class object.

Usage

## S3 method for class 'FDX'
print(x, ...)

Arguments

x

an object of class "FDX".

...

further arguments to be passed to or from other methods. They are ignored in this function.

Value

The respective input object is invisibly returned via invisible(x).

Examples

X1 <- c(4, 2, 2, 14, 6, 9, 4, 0, 1)
X2 <- c(0, 0, 1, 3, 2, 1, 2, 2, 2)
N1 <- rep(148, 9)
N2 <- rep(132, 9)
Y1 <- N1 - X1
Y2 <- N2 - X2
df <- data.frame(X1, Y1, X2, Y2)
df

# Construction of the p-values and their supports (fisher.pvalues.support
# is from 'DiscreteFDR' package!)
df.formatted <- fisher.pvalues.support(counts = df, input = "noassoc")
raw.pvalues <- df.formatted$raw
pCDFlist <- df.formatted$support

DPB.crit <- DPB(raw.pvalues, pCDFlist, critical.values = TRUE)
print(DPB.crit)