ICAorthW {ProDenICA}

turn a matrix W into an orthogonal matrix

Description

use the SVD to orthogonalize a matrix

Usage

ICAorthW(W)

Arguments

W

input matrix

Details

simply replace the D matrix of the SVD of W by the identity

Value

orthogonalized version of W

Note

If W=UDV', then returns UV'

Author(s)

Trevor Hastie

Examples

W0 <- matrix(rnorm(2*2), 2, 2)
W0 <- ICAorthW(W0)