R中Matrix包，求指导？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

library(Matrix)
a<-sample(1:10,10,replace=T)
b<-sample(1:10,10,replace=T)
c<-sparseMatrix(a,b,x=1)
输入以上函数，为什么结果会是这样：
10 x 10 sparse Matrix of class "dgCMatrix"

[1,] . . . . 1 . 1 . . .
[2,] . . . . 1 . . . . .
[3,] . . . . . . . . . .
[4,] . . . . 1 . . . 1 .
[5,] . . . . . . . . . .
[6,] . . . . . . . 2 1 .
[7,] . . . . . . . . . .
[8,] . . . . . . . . . .
[9,] . . . . . . . . . .
[10,] . 1 . . . . . . . 1
不是应该随机生成十个值为1的元素吗？

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：matrix Mat 求指导 Library BRARY library replace Matrix

这里的‘.’表示0，为了看的时候方便

a,b是给出10*10 spase矩阵的哪个位置应该赋值为１，a 为行，b为列，由于你的a,b在sample时有有放回的，因此可能出现重复值，这样导致matrix的元素也可能重复，每重复一次，该元素值增加1，因此你上述代码的matrix中（6，9）重复了一次，因此是2.解决该问题你可以用无放回抽样。
library(Matrix)
set.seed(1) # 加入这个是为了抽样的结果是完全一样的。
a<-sample(1:10,10,replace=F)
b<-sample(1:10,10,replace=F)
c<-sparseMatrix(a,b,x=1)

a,b是给出10*10 spase矩阵的哪个位置应该赋值为１，a 为行，b为列，由于你的a,b在sample时有有放回的，因此可能出现重复值，这样导致matrix的元素也可能重复，每重复一次，该元素值增加1，因此你上述代码的matrix中（6，9）重复了一次，因此是2.解决该问题你可以用无放回抽样。
library(Matrix)
set.seed(1) # 加入这个是为了抽样的结果是完全一样的。
a<-sample(1:10,10,replace=F)
b<-sample(1:10,10,replace=F)
c<-sparseMatrix(a,b,x=1)

秋日私语 发表于 2015-4-10 09:51
a,b是给出10*10 spase矩阵的哪个位置应该赋值为１，a 为行，b为列，由于你的a,b在sample时有有放回的，因此 ...

谢谢，如果不加set.seed(1)也是可以的吧？
加入这个只是为了每次调用这个代码时生成的结果一样？
set.seed()是不是可以在任何r代码中使用，只是为了验证结果的相同性？

只是抽样或伪随机数生成的时候用，只是为了抽样或伪随机数生成结果的相同性。