Replace matrix diagonal

diag(x) <- value

Arguments

x

Object x

value

Replacement value