Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/kotlin/3.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在R中的循环中替换矩阵中的行_R_For Loop_Matrix - Fatal编程技术网

在R中的循环中替换矩阵中的行

在R中的循环中替换矩阵中的行,r,for-loop,matrix,R,For Loop,Matrix,我试图在R中编写一个简单的马尔可夫模型。为了生成马尔可夫跟踪,我创建了一个空矩阵,其中ncol=状态数,nrow=循环数。我正在编写一个函数,使用循环将矩阵的每一行替换为每一个循环,但循环失败了 Rounds<-function(cycles,TransMatrix){ for (i in 1:nrow(MarkovTrace)){ MarkovTrace[i+1,]<-as.vector(MarkovTrace[i,]%*%TransMatrix) } } Rou

我试图在R中编写一个简单的马尔可夫模型。为了生成马尔可夫跟踪,我创建了一个空矩阵,其中ncol=状态数,nrow=循环数。我正在编写一个函数,使用循环将矩阵的每一行替换为每一个循环,但循环失败了

Rounds<-function(cycles,TransMatrix){
  for (i in 1:nrow(MarkovTrace)){
    MarkovTrace[i+1,]<-as.vector(MarkovTrace[i,]%*%TransMatrix)
  }
}

Rounds当你说它失败时,你可以使用
,它告诉你什么?它是否说数组索引超出了范围?如果是,则循环直到
nrow(MarkovTrace)-1
。(注意-1。)您可能喜欢的关于函数编程的简短注释:或者,将
MarkovTrace
作为第三个参数传递给函数,并在
for
循环后返回
MarkovTrace
MarkovTrace[2,]<-as.vector(MarkovTrace[1,]%*%TransMatrix)
MarkovTrace[3,]<-as.vector(MarkovTrace[2,]%*%TransMatrix)