The various other pumaPCA... functions are called during the execution of pumaPCA
pumaPCA( eset
, latentDim = if(dim(exprs(eset))[2] <= 3="" 1000="" 3)="" dim(exprs(eset))[[2]]-1="" else="" ,="" samplesize="if(dim(exprs(eset))[1]" <="1000)" dim(exprs(eset))[[1]]="" ##="" set="" to="" integer="" or="" false="" for="" all="" initpca="TRUE" initialise="" parameters="" with="" pca="" randomorder="FALSE" update="" in="" random="" order="" optimmethod="BFGS" ?optim="" details="" of="" methods="" stoppingcriterion="deltaW" can="" also="" be="" "deltal"="" tol="1e-3" stop="" when="" delta="" this="" stepchecks="FALSE" check="" likelihood="" after="" each="" update?="" iterationnumbers="TRUE" show="" iteration="" numbers?="" showupdates="FALSE" values="" showtimings="FALSE" timings="" showplot="FALSE" projection="" plot="" maxiters="500" number="" em="" iterations.="" transposedata="FALSE" transpose="" eset="" matrices?="" returnexpectations="FALSE" returndata="FALSE" returnfeedback="FALSE" pumanormalize="TRUE" )<="" div="">=>
ExpressionSet
. tol
. If "deltaL" will stop when L (lambda) changes by less than tol
. stoppingCriterion
. pumaPCARes
pumaDE
, createDesignMatrix
and createContrastMatrix
# Next 4 lines commented out to save time in package checks, and saved version used
# if (require(affydata)) {
# data(Dilution)
# eset_mmgmos <- mmgmos(Dilution)
# }
data(eset_mmgmos)
pumapca_mmgmos <- pumaPCA(eset_mmgmos)
plot(pumapca_mmgmos)
Run the code above in your browser using DataLab