R/matrix.rank.R
In ftsa: Functional Time Series Analysis

matrix.rank <- function(X)
{
    X.sv <- abs(La.svd(X)$d)
    return(sum((X.sv/max(X.sv)) > 1e-09))
}

Any scripts or data that you put into this service are public.

ftsa documentation built on May 29, 2024, 2:47 a.m.

Note that we can't provide technical support on individual packages. You should contact the package authors for that.

Try the ftsa package in your browser