我想建立从载体如下的矩阵:如果y的第一个元素为5,我想使矩阵的第一行和第五列中的第1行。其他人是0 y=round(runif(30)*9)+1
y_m=matrix(rep(0,length(y)*10),ncol=10)
for (i in 1:length(y)){
y_m[i,y[i]]=1;
}
有什么办法可以避免for循环?我试图做y_m[,y]=1,但显然它不工作
我想使用数组元素的索引将函数应用于数组。例如,如果我有一个数组 ar,我想计算ar[x,y] <- x + y。 使用嵌套for for循环很容易。我想用一个应用函数来完成这个任务。 ar <- array(data = 1, dim = c(2,2))
for(i in 1:2){
for(j in 1:2){
ar[i,j] <- i +j
}
}
ar