bandSparse(Matrix)
bandSparse()所属R语言包：Matrix
Construct Sparse Banded Matrix from (Sup-/Super-) Diagonals
构建从（Sup-/Super-）对角线稀疏带状矩阵
译者：生物统计家园网 机器人LoveR
描述----------Description----------
Construct a sparse banded matrix by specifying its non-zero sup- and super-diagonals.
指定非零的支持和超对角线构建一个稀疏的带状矩阵。
用法----------Usage----------
bandSparse(n, m = n, k, diagonals, symmetric = FALSE, giveCsparse = TRUE)
参数----------Arguments----------
参数：n,m
the matrix dimension (n,m) = (nrow, ncol).
矩阵维(n,m) = (nrow, ncol)。
参数：k
integer vector of “diagonal numbers”, with identical meaning as in band(*, k).
整数向量“对角线的数字”，与band(*, k)相同的意义。
参数：diagonals
optional list of sub-/super- diagonals; if missing, the result will be a pattern matrix, i.e., inheriting from class nMatrix. diagonals can also be n' x d matrix, where d <- length(k) and n' >= min(n,m). In that case, the sub-/super- diagonals are taken from the columns of diagonals, where only the first several rows will be used (typically) for off-diagonals.
可选列表sub-/super-对角线，如果缺失，其结果将是一个模式矩阵，即，继承类nMatrix。 diagonals也可以是n' x d矩阵，其中d <- length(k)和n' >= min(n,m)。在这种情况下，sub-/super-对角线拍摄从diagonals，其中只有前几行，将被用于非对角线（典型值）的列。
参数：symmetric
logical; if true the result will be symmetric (inheriting from class symmetricMatrix) and only the upper or lower triangle must be specified (via k and diagonals).
逻辑;如果属实，结果将是对称的（从类继承symmetricMatrix），只有上部或下部的三角形必须指定（通过k和diagonals）。
参数：giveCsparse
logical indicating if the result should be a CsparseMatrix or a TsparseMatrix. The default, TRUE is very often more efficient subsequently, but not always.
逻辑表示，如果结果应该是一个CsparseMatrix或TsparseMatrix。默认情况下，TRUE往往更有效率其后，但并不总是。
值----------Value----------
a sparse matrix (of class CsparseMatrix) of dimension n x m with diagonal “bands” as specified.
一个稀疏矩阵（classCsparseMatrix）维n x m对角线“带”为指定的。
参见----------See Also----------
band, for extraction of matrix bands; bdiag, diag, sparseMatrix, Matrix.
band，提取矩阵带; bdiag，diag，sparseMatrix，Matrix。
举例----------Examples----------
diags <- list(1:30, 10*(1:20), 100*(1:20))
s1 <- bandSparse(13, k = -c(0:2, 6), diag = c(diags, diags[2]), symm=TRUE)
s1
s2 <- bandSparse(13, k = c(0:2, 6), diag = c(diags, diags[2]), symm=TRUE)
stopifnot(identical(s1, t(s2)), is(s1,"dsCMatrix"))
## a pattern Matrix of *full* (sub-)diagonals:[＃*全*（分）对角线模式矩阵：]
bk <- c(0:4, 7,9)
(s3 <- bandSparse(30, k = bk, symm = TRUE))
## If you want a pattern matrix, but with "sparse"-diagonals,[＃如果你想要一个模式矩阵，但与“疏”的对角线，]
## you currently need to go via logical sparse:[＃你目前需要去通过逻辑稀疏：]
lLis <- lapply(list(rpois(20, 2), rpois(20,1), rpois(20,3))[c(1:3,2:3,3:2)],
as.logical)
(s4 <- bandSparse(20, k = bk, symm = TRUE, diag = lLis))
(s4. <- as(drop0(s4), "nsparseMatrix"))
n <- 1e4
bk <- c(0:5, 7,11)
bMat <- matrix(1:8, n, 8, byrow=TRUE)
bLis <- as.data.frame(bMat)
B <- bandSparse(n, k = bk, diag = bLis)
Bs <- bandSparse(n, k = bk, diag = bLis, symmetric=TRUE)
B [1:15, 1:30]
Bs[1:15, 1:30]
## can use a list *or* a matrix for specifying the diagonals:[＃可以使用一个列表或一个指定的对角线矩阵：]
stopifnot(identical(B, bandSparse(n, k = bk, diag = bMat)),
identical(Bs, bandSparse(n, k = bk, diag = bMat, symmetric=TRUE)))
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注：
注1：为了方便大家学习，本文档为生物统计家园网机器人LoveR翻译而成，仅供个人R语言学习参考使用，生物统计家园保留版权。
注2：由于是机器人自动翻译，难免有不准确之处，使用时仔细对照中、英文内容进行反复理解，可以帮助R语言的学习。
注3：如遇到不准确之处，请在本贴的后面进行回帖，我们会逐渐进行修订。
|
发表于 2012-2-16 20:52:18
