我想从主要的矩阵创建一个样本矩阵,其列数为sam,行数较少(50),我尝试使用一系列循环,但是没有用:
n=nrow(data)
camp <- sample(1:n,size=50,replace=TRUE)
n<-length(camp)
c<-ncol(data)
for(i in 1:n){
t<-camp[i]
for(k in 1:c){
campione[i,k]<-data[t,k]}
}
版权声明:本文内容由阿里云实名注册用户自发贡献,版权归原作者所有,阿里云开发者社区不拥有其著作权,亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容,填写侵权投诉表单进行举报,一经查实,本社区将立刻删除涉嫌侵权内容。
您不需要使用循环。您只需要从主矩阵中随机抽取几行即可:
mat = matrix(runif(2000),ncol=20)
sample_matrix = mat[sample(1:nrow(mat),50),]