Получить наиболее встречающуюся цифру в строке матрицы и объединить результаты

Question

У меня есть матрица eval_matrix, которая имеет размеры (200,45).Я хочу получить самую встречающуюся цифру в каждой строке и хочу создать новую матрицу maj из 200 строк и одного столбца.

Я пытаюсь это:

maj=c()
for (i in nrow(eval_matrix)){
  m=names(which.max(table(eval_matrix[i,])))
  m<-as.numeric(m)
  maj<-rbind(maj,m)
}
View(maj)

Но это только дает мне результат последней строки в моей новой матрице maj.

Что здесь не так?

Answer 1

Вы также можете использовать apply() для каждой строки матрицы и превратить результат в матрицу из одного столбца.В одну строку:

matrix(as.numeric(apply(eval_matrix, 1, function(x) names(which.max(table(x))))), ncol=1)