R：For循环仅执行一次

Question

Why is the following code only run once?

  for ( i in length( which( rowSums( m ) != 1 ) ) ) {
      m[which( rowSums( m ) != 1 )[i], ncol( m )] <- 1
      print(i)
  }

m is matrix that contains values between 0 and 1 under the condition that the sum of each row can't exceed 1.

Answer 1

It should be 1:length( which( rowSums( m ) != 1 ))

You want to iterate through a vector in your loop.