私が行列を有するR

Question

における対角行列の各要素

に値を追加する：

1 2 3 
5 6 10 
8 3 5 

Iは対角の各要素に値（2言う）を追加したい：

3 2 3  
5 8 10 
8 3 7 

どうすればいいですか？あなたのサンプルデータで

Answer 1

は

m<-matrix(scan(text="1 2 3 
5 6 10 
8 3 5"), ncol=3) 

あなたは、この両方の抽出物にdiag()機能を使用してdiag機能は、この目的のために最善である

diag(m) <- diag(m)+2 
m 

Answer 2

があなたの行列の対角要素を更新することができます別の方法です：

d <- row(m)-col(m)==0 
m[d] <- m[d]+2 

dは、対角要素のみがTRUEである論理行列です。