spMatrix(Matrix)
spMatrix()所属R语言包：Matrix
Sparse Matrix Constructor From Triplet
从三稀疏矩阵的构造
译者：生物统计家园网 机器人LoveR
描述----------Description----------
User friendly construction of a sparse matrix (inheriting from class TsparseMatrix) from the triplet representation.
用户友好的稀疏矩阵建设（从类继承TsparseMatrix）从三重代表性。
用法----------Usage----------
spMatrix(nrow, ncol, i = integer(), j = integer(), x = numeric())
参数----------Arguments----------
参数：nrow, ncol
integers specifying the desired number of rows and columns.
指定所需的行和列数的整数。
参数：i,j
integer vectors of the same length specifying the locations of the non-zero (or non-TRUE) entries of the matrix.
相同长度的整数向量指定地点非零（非TRUE）项的矩阵。
参数：x
atomic vector of the same length as i and j, specifying the values of the non-zero entries.
长度相同的原子矢量i和j，指定非零项的值。
值----------Value----------
A sparse matrix in triplet form, as an R object inheriting from both TsparseMatrix and generalMatrix.
一个三重形式的稀疏矩阵，既TsparseMatrix和generalMatrixR对象继承。
The matrix M will have M[i[k], j[k]] == x[k], for k = 1,2,…, n, where n = length(i) and M[ i', j' ] == 0 for all other pairs (i',j').
矩阵MM[i[k], j[k]] == x[k]，k = 1,2,…, n，其中n = length(i)和M[ i', j' ] == 0对所有其他(i',j')。
参见----------See Also----------
Matrix(*, sparse=TRUE) for the more usual constructor of such matrices; similarly, sparseMatrix which is a bit more general than spMatrix() and returns a CsparseMatrix which is often slightly more desirable. Further, bdiag and Diagonal for (block-)diagonal matrix constructors.
Matrix(*, sparse=TRUE)更常见的这类矩阵的构造;同样，sparseMatrix这是一个比较一般比spMatrix()和返回CsparseMatrix这往往是稍微更可取。此外，bdiag和Diagonal（块）对角线矩阵建设者。
Consider TsparseMatrix and similar class definition help files.
考虑TsparseMatrix“类似的类定义帮助文件。
举例----------Examples----------
## simple example[＃简单的例子]
A <- spMatrix(10,20, i = c(1,3:8),
j = c(2,9,6:10),
x = 7 * (1:7))
A # a "dgTMatrix"[“dgTMatrix”]
summary(A)
str(A) # note that *internally* 0-based indices (i,j) are used[*国内* 0指数（I，J）用于]
L <- spMatrix(9, 30, i = rep(1:9, 3), 1:27,
(1:27) %% 4 != 1)
L # an "lgTMatrix"[“lgTMatrix”]
### This is a useful utility, to be used for experiments :[＃＃这是一个有用的工具，可用于实验：]
rSpMatrix <- function(nrow, ncol, nnz,
rand.x = function(n) round(rnorm(nnz), 2))
{
## Purpose: random sparse matrix[＃用途：随机稀疏矩阵]
## --------------------------------------------------------------[＃------------------------------------------------- -------------]
## Arguments: (nrow,ncol): dimension[＃参数：（NROW，NCOL）：维]
## nnz : number of non-zero entries[＃NNZ：非零条目数]
## rand.x: random number generator for 'x' slot[＃rand.x：X槽的随机数发生器]
## --------------------------------------------------------------[＃------------------------------------------------- -------------]
## Author: Martin Maechler, Date: 14.-16. May 2007[＃作者：马丁Maechler，日期：14.-16。二零零七年五月]
stopifnot((nnz <- as.integer(nnz)) >= 0,
nrow >= 0, ncol >= 0,
nnz <= nrow * ncol)
spMatrix(nrow, ncol,
i = sample(nrow, nnz, replace = TRUE),
j = sample(ncol, nnz, replace = TRUE),
x = rand.x(nnz))
}
M1 <- rSpMatrix(100000, 20, nnz = 200)
summary(M1)
转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。
注：
注1：为了方便大家学习，本文档为生物统计家园网机器人LoveR翻译而成，仅供个人R语言学习参考使用，生物统计家园保留版权。
注2：由于是机器人自动翻译，难免有不准确之处，使用时仔细对照中、英文内容进行反复理解，可以帮助R语言的学习。
注3：如遇到不准确之处，请在本贴的后面进行回帖，我们会逐渐进行修订。
|
发表于 2012-2-16 19:03:30
