Create a sparse plus low rank matrix

Source: R/object.R

Create a sparse plus low rank matrix

sparseLRMatrix(sparse, U, V)

Arguments

sparse

sparseMatrix.
U

Matrix.
V

Matrix.

Value

A sparseLRMatrix S4 object.

Examples


set.seed(528491)

n <- 50
m <- 40
k <- 3

A <- rsparsematrix(n, m, 0.1)

U <- Matrix(rnorm(n * k), nrow = n, ncol = k)
V <- Matrix(rnorm(m * k), nrow = m, ncol = k)

# construct the matrix, which represents A + U %*% t(V)
X <- sparseLRMatrix(sparse = A, U = U, V = V)

dim(X)

#> [1] 50 40

s <- svds(X, 5)  # efficient