octave: Example Code

 
 21.4 Examples of Usage
 ======================
 
 The following can be used to solve a linear system ‘A*x = b’ using the
 pivoted LU factorization:
 
        [L, U, P] = lu (A); ## now L*U = P*A
        x = U \ (L \ P) * b;
 
 This is one way to normalize columns of a matrix X to unit norm:
 
        s = norm (X, "columns");
        X /= diag (s);
 
 Broadcasting::):
 
        s = norm (X, "columns");
        X ./= s;
 
 The following expression is a way to efficiently calculate the sign of a
 permutation, given by a permutation vector P.  It will also work in
 earlier versions of Octave, but slowly.
 
        det (eye (length (p))(p, :))
 
 Finally, here’s how to solve a linear system ‘A*x = b’ with Tikhonov
 regularization (ridge regression) using SVD (a skeleton only):
 
        m = rows (A); n = columns (A);
        [U, S, V] = svd (A);
        ## determine the regularization factor alpha
        ## alpha = ...
        ## transform to orthogonal basis
        b = U'*b;
        ## Use the standard formula, replacing A with S.
        ## S is diagonal, so the following will be very fast and accurate.
        x = (S'*S + alpha^2 * eye (n)) \ (S' * b);
        ## transform to solution basis
        x = V*x;