作者KnightX (........)
看板Statistics
标题Re: [问题] 如何宣告一个变数为矩阵?
时间Tue Feb 28 10:22:56 2012
※ 引述《celestialgod (攸蓝)》之铭言：
: n <- 200
: for(i in 1:n)
: for(j in 1:100)
: {{
: apple[i,j] <- sample(rownames(fruit0),1,rep)
: }}
: apple[,1] =>叫出第一行
: apple[1,] =>叫出第一列
: 直接把它设为矩阵吧!!
: 你如果要一个个VECTOR弄的话
: 就要去指定很多个VECTOR 最後再合并成矩阵
照上述写法应该是每一个列都是抽出放回的形式(因为你设定每次仅抽一个)，
更简单的写法可以改成下列方式(100 x 200 的矩阵)：
n <- 200
apple <- matrix(sample(rownames(fruit0), 100*n, rep=TRUE), nrow=100)
不过原 PO 的问题似乎是要每一列的向量(100 x 1)是抽出不放回的 rowname，
所以可以考虑以下写法，储存为所需的 100 x 200 的矩阵：
n <- 200
apple <- sapply(1:n, function(x) sample(rownames(fruit0), 100, rep=FALSE))
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 111.240.39.167
※ 编辑: KnightX 来自: 111.240.39.167 (02/28 10:23)