FLLat.PVE(Y, J.seq=seq(1,min(15,floor(ncol(Y)/2)),by=2), B=c("pc","rand"),
lams=c("same","diff"), thresh=10^(-4), maxiter=100, maxiter.B=1,
maxiter.T=1)# S3 method for PVE
plot(x, xlab="Number of Features", ylab="PVE", …)
"pc"
(the
first \(J\) principal components of Y
) or "rand"
(a
random selection of \(J\) columns of Y
). The default is
"pc"
."same"
) or to calculate the optimal tuning parameters for each
value of \(J\) ("diff"
). When using the same values, the
optimal tuning parameters are calculated once for the default value of
\(J\) in the FLLat algorithm. The default is "same"
.PVE
, as returned by
FLLat.PVE
.PVE
with components:
J.seq
.plot
method for PVE
objects.J.seq
. The PVE is defined to be: $$PVE = 1 -
\frac{RSS}{TSS}$$ where RSS and TSS denote the
residual sum of squares and the total sum of squares, respectively.
For each value of \(J\), the PVE is calculated by fitting the FLLat
model with that value of \(J\).There are two choices for how the tuning parameters are chosen when
fitting the FLLat model for each value of \(J\). The first choice,
given by lams="same"
, applies the FLLat.BIC
function just once for the default value of \(J\). The resulting
optimal tuning parameters are then used for all values of \(J\) in
J.seq
. The second choice, given by lams="diff"
, applies
the FLLat.BIC
function for each value of \(J\) in
J.seq
. Although this second choice will give a more accurate
measure of the PVE, it will take much longer to run than the first
choice.
When the PVE is plotted against \(J\), as \(J\) increases the PVE will begin to plateau after a certain point, indicating that additional features are not improving the model. Therefore, the value of \(J\) to use in the FLLat algorithm can be chosen as the point at which the PVE plot begins to plateau.
For more details, please see Nowak and others (2011) and the package vignette.
FLLat
, FLLat.BIC
## Load simulated aCGH data.
data(simaCGH)
## Generate PVEs for J ranging from 1 to the number of samples divided by 2.
result.pve <- FLLat.PVE(simaCGH,J.seq=1:(ncol(simaCGH)/2))
## Generate PVE plot.
plot(result.pve)
Run the code above in your browser using DataLab