R Under development (unstable) (2026-05-23 r90071 ucrt) -- "Unsuffered Consequences"
Copyright (C) 2026 The R Foundation for Statistical Computing
Platform: x86_64-w64-mingw32/x64

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(testthat)
> library(bpca)
> 
> test_check("bpca")
             Sepal.Length Sepal.Width Petal.Length Petal.Width
Sepal.Length            -                                    *
Sepal.Width                         -                         
Petal.Length                                     -            
Petal.Width             *                                    -
 Eigenvalue(s):				 20.85321 11.67007 4.676192 1.756847
  - Considered on reduction:		 20.85321 11.67007
  - Variance retained by each:		 0.7296245 0.2285076
  - Cumulative variance retained:	 0.7296245 0.9581321
  - Prop. of total variance retained:	 0.958
% latex table generated in R 4.7.0 by xtable 1.8-8 package
% Mon May 25 19:21:10 2026
\begin{table}[ht]
\centering
\begin{tabular}{lrrr}
  \hline
  &&\multicolumn{2}{c}{Eigenvalues} \\ \cline{3-4}
 &&  PC1 $(\lambda_1=11.07)$& PC2 $(\lambda_2=6.59)$ \\ 
  \hline 
 \multirow{4}{*}{Eigenvectors}&area&0.47&-0.6 \\ 
 \hline
&peri & 0.59 & -0.24 \\ 
  &shape & -0.39 & -0.71 \\ 
   \hline
&perm & -0.52 & -0.28 \\ 
  &Variance retained & 0.65 & 0.23 \\ 
  &Variance accumulated & 0.65 & 0.88 \\ 
  \end{tabular}
\end{table}
[ FAIL 0 | WARN 0 | SKIP 0 | PASS 99 ]
> 
> proc.time()
   user  system elapsed 
   1.17    0.32    1.48