Estoy tratando de sumar los elementos a lo largo del antidiagonal (diagonal secundaria, diagonal menor) de una matriz.

Entonces, si tengo una matriz m:

m <- matrix(c(2, 3, 1, 4, 2, 5, 1, 3, 7), 3)
m

     [,1] [,2] [,3]
[1,]    2    4    1
[2,]    3    2    3
[3,]    1    5    7

Estoy buscando la sumam[3, 1] + m[2, 2] + m[1, 3]es decir1 + 2 + 1

No puedo entender cómo configurar una iteración. Por lo que sé, no hay ninguna función para esto (comodiag() para la otra diagonal).