対角成分を抽出する機能が見つからずに困ってしまいました。列ベクトルをまとめた行列の列方向の分散を求めたいんですが、var(A)とすると共分散まで計算されてしまいます（cov()があるから別にいいのに）。なので、そこから共分散行列の対角成分であるところ…