PCA for QTS Sample

## Usage

```
# S3 method for qts_sample
prcomp(x, M = 5, fit = FALSE, ...)
```

## Arguments

- x
An object of class qts_sample.

- M
An integer value specifying the number of principal component to compute. Defaults to

`5L`

.- fit
A boolean specifying whether the resulting

`prcomp_qts`

object should store a reconstruction of the sample from the retained PCs. Defaults to`FALSE`

.- ...
Arguments passed to or from other methods.

## Value

An object of class `prcomp_qts`

which is a list with the following
components:

`tpca`

: An object of class`MFPCAfit`

as produced by the function`MFPCA::MFPCA()`

,`var_props`

: A numeric vector storing the percentage of variance explained by each PC,`mean_qts`

: An object of class qts containing the mean QTS,`principal_qts`

: A list of qtss containing the required principal components.

## Examples

```
res_pca <- prcomp(vespa64$igp[1:16])
#> ℹ The maximum number of principal component is 15.
```