JacksonParameters: JacksonParameters: To calculates the parameters needed to...

Description Usage Arguments Value Author(s) See Also Examples

View source: R/JacksonParameters.R

Description

Given PCA model, this function calculates the parameters to perform the Jackson statistics of the Q-residuals.

Usage

1
JacksonParameters(nPCs, TFBS)

Arguments

nPCs

number of principal components of the model

TFBS

numerical TFBS matrix

Value

output:list including the parameters h0 x1, x2 and x3 needed to calculate the Q-residuals statistics

Author(s)

Erola Pairo <epairo@ibec.pcb.ub.es>

See Also

kfold.PCA, Predict.PCA, QtoJackson

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
data(TranscriptionFactor)
data(iicc)
nPCs<-1
TFBS<-iicc$Transcriptionfactor
     Prob<-iicc$background
    missing<-iicc$missing
     NumericalMatrix<-numericalDNA(Prob)
    suma<-apply(TFBS,2,function(y){sum(y=="-")})
    threshold<-floor(nrow(TFBS)*missing/100)
    TFBS<-TFBS[, suma<=threshold]
    ncolTFBS<-ncol(TFBS)
    TFBSnum<-apply(TFBS,1,function(x){as.vector(t(NumericalMatrix[x,]))})
    TFBSnum<-t(TFBSnum)
    model<-pca(TFBSnum, nPcs=nPCs, method="svd", center=TRUE)
    JacksonPars<-JacksonParameters(nPCs,TFBSnum)

MEET documentation built on May 2, 2019, 5:52 p.m.