Я не знаю точно, что вы делаете.Я полагаю, вы имитируете броски кубика?Итак, у вас есть data.frame с двумя столбцами, каждый из которых содержит броски одного кубика?Например:
die_rolls <- data.frame(die1 = c(1, 2, 6, 3, 1, 4), die2 = c(3, 5, 6, 2, 1, 1))
Тогда вы можете создать новый столбец, который вычисляет разницу.А затем использует его абсолютное значение, т.е. у вас не будет отрицательных значений.
die_rolls$difference <- abs(die_rolls$die1 - die_rolls$die2)