defl.select: deflation function
In ecamenen/r-rgcca: RGCCA and Sparse GCCA for multi-block data analysis

The function defl.select() computes residual matrices \mathbf{X}_{1,h+1}, …, \mathbf{X}_{J,h+1}. These residual matrices are determined according to the following formula: \mathbf{X}_{j,h+1} = \mathbf{X}_{jh} - \mathbf{y}_{jh} \mathbf{p}_{jh}^t.

1	defl.select(yy, rr, nncomp, nn, nbloc)

`yy`	A matrix that contains the SGCCA block components of each block: \mathbf{y}_{1h}, …, \mathbf{y}_{Jh}
`rr`	A list that contains the residual matrices \mathbf{X}_{1h}, …, \mathbf{X}_{Jh}
`nncomp`	A 1 \times J vector that contains the number of components to compute for each block.
`nn`	A 1 \times J vector that contains the numbers of already computed components for each block
`nbloc`	Number of blocks.

`resdefl`	A list of J elements that contains \mathbf{X}_{1,h+1}, …, \mathbf{X}_{J,h+1}.
`pdefl`	A list of J elements that contains \mathbf{p}_{1h}, …, \mathbf{p}_{Jh}.