plotDiffTpcaVolcano: Plot differential TPCA analysis results

Description Usage Arguments Value Examples

View source: R/functions.R

Description

Plot differential TPCA analysis results

Usage

1
2
3
4
5
6
plotDiffTpcaVolcano(
  tpcaObj,
  alpha = 0.1,
  setXLim = FALSE,
  xlimit = c(-0.75, 0.75)
)

Arguments

tpcaObj

a tpcaObj after having performed a differential analysis, see runDiffTPCA

alpha

significance level / FDR at which null hypothesis should be rejected

setXLim

logical determining whether x-axis limits should be set according to xlimit

xlimit

numeric vector with two elements determing the x-axis limits, only is implemented if setXLim is set to TRUE

Value

ggplot displaying a volcano plot

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
library(dplyr)
library(Biobase)

m1 <- matrix(1:28, ncol = 4)
m2 <- matrix(2:25, ncol = 4)
m3 <- matrix(c(2:10, 1:19), ncol = 4)

rownames(m1) <- 1:7
rownames(m2) <- 3:8
rownames(m3) <- 2:8

mat_list <- list(
    m1, m2, m3
)

c1 <- matrix(29:2, ncol = 4)
c2 <- matrix(26:3, ncol = 4)
c3 <- matrix(c(11:3, 20:2), ncol = 4)

rownames(c1) <- 1:7
rownames(c2) <- 3:8
rownames(c3) <- 2:8

contrast_list <- list(
    c1, c2, c3
)

ppi_anno <- tibble(
    x = c("3", "3"),
    y = c("5", "7"),
    pair = c("3:5", "3:7"))

ref_df <- tibble(
    pair = c("3:5", "3:7"),
    valueC2 = c(4, 8)
)

diff_tpca <- runDiffTPCA(
  mat_list, contrast_list, ppiAnno = ppi_anno)

plotDiffTpcaVolcano(diff_tpca)

Rtpca documentation built on Nov. 8, 2020, 7:44 p.m.