Как я могу добавить два именованных вектора вместе, чтобы создать матрицу Nx2 из Nx3 в R?

Question

Я пытаюсь создать задачу для двух классов из матрицы трех классов.Мне нужно установить его как «Интересно против других», где «Другие» - это сумма векторов столбцов «Не интересно» и «ОК».Я начинаю с Таблицы 1 и не знаю, как добраться до Таблицы 2.

Table 1:
   Interesting Not interesting        OK
2    0.3043478       0.1739130 0.5217391
6    0.2857143       0.2380952 0.4761905
7    0.0000000       0.5555556 0.4444444
9    0.1818182       0.2727273 0.5454545
10   0.4000000       0.1333333 0.4666667
11   0.2558140       0.2790698 0.4651163

Table 2:
   Interesting Others        
2    0.3043478 0.6956522
6    0.2857143 0.7142857
7    0.0000000 1.0000000
9    0.1818182 0.8181818
10   0.4000000 0.6000000
11   0.2558140 0.7441860

Я работаю с деревьями решений, и вот часть кода до Таблицы 1:

pred=predict(my_tree,newdata=validation)
head(pred)
pred

Answer 1

Вот несколько идей (если вы работаете с фреймами данных, а не с матрицами)

# subtract interesting from 1
table2 = data.frame(Interesting = table1$Interesting, Others = 1 - table1$Interesting)

# add up everything but the first column
table2 = cbind(table1[1], Others = rowSums(table1[-1]))

# if it is really just two columns, use +
table2 = table1[1]
table2$Others = with(table1, `Not interesting` + OK)

Answer 2

Похоже, все, что вам нужно сделать, это:

t1$Others <- t1$'Not Interesting' + t1$OK

Затем просто удалите неиспользуемые столбцы:

t1$'Not Interesting' <- NULL

t1$OK <- NULL