У меня есть набор переменных, закодированных как биномиальные.

   Pre VALUE_1 VALUE_2 VALUE_3 VALUE_4 VALUE_5 VALUE_6 VALUE_7 VALUE_8 
1   1       0       0       0       0       0       1       0       0       
2   1       0       0       0       0       1       0       0       0       
3   1       0       0       0       0       1       0       0       0       
4   1       0       0       0       0       1       0       0       0           

Я хотел бы объединить переменные (VALUE_1, VALUE_2 ... VALUE_8) в один упорядоченный коэффициент, сохраняя при этом столбец (Pre) как есть, так что данные будут выглядеть так:

  Pre VALUE
1  1  VALUE_6
2  1  VALUE_5
3  1  VALUE_5

Или даже лучше:

  Pre VALUE
1  1  6
2  1  5
3  1  5

Я знаю, что это существует:Запись фиктивной переменной в упорядоченный множитель

Но когда я пробую код, использованный в этом посте, я получаю следующую ошибку:

PA2$Factor = factor(apply(PA2, 1, function(x) which(x == 1)), labels = colnames(PA2)) 

Error in sort.list(y) : 'x' must be atomic for 'sort.list'
Have you called 'sort' on a list?

Любая помощь будет оценена