行列の非対角要素を抽出したい

対角要素はdiagで行けるけど、非対角要素がわからんかったので教えてもらった。
row, col()関数ってのがあるらしい。知らんかった…

> x <- matrix(1:4, 2)
> x
     [,1] [,2]
[1,]    1    3
[2,]    2    4
> x[row(x) != col(x)]
[1] 2 3
> diag(x)
[1] 1 4