Как вычислить матрицу суммы двух бросков кубиков в R?

Question

Существует ли идиоматический c способ вычисления суммы двух бросков кубиков в R в виде матрицы?

Это вывод, который я ищу:

      [1]  [2]  [3]  [4]  [5]  [6]
[1]    2    3    4    5    6    7
[2]    3    4    5    6    7    8
[3]    4    5    6    7    8    9
[4]    5    6    7    8    9   10
[5]    6    7    8    9   10   11
[6]    7    8    9   10   11   12

Answer 1

Наружная функция предназначена для взятия внешнего произведения двух векторов, но вы можете переключить функцию на «+».

outer(1:6, 1:6, "+")

Answer 2

Другая базовая опция R, кроме outer, с использованием replicate

r <- t(replicate(6,1:6))+1:6

или

r <- (u <- replicate(6,1:6)) + t(u)

, такая что

> r
     [,1] [,2] [,3] [,4] [,5] [,6]
[1,]    2    3    4    5    6    7
[2,]    3    4    5    6    7    8
[3,]    4    5    6    7    8    9
[4,]    5    6    7    8    9   10
[5,]    6    7    8    9   10   11
[6,]    7    8    9   10   11   12

Answer 3

sapply(seq(6), "+", seq(6))

#     [,1] [,2] [,3] [,4] [,5] [,6]
#[1,]    2    3    4    5    6    7
#[2,]    3    4    5    6    7    8
#[3,]    4    5    6    7    8    9
#[4,]    5    6    7    8    9   10
#[5,]    6    7    8    9   10   11
#[6,]    7    8    9   10   11   12