科学・IＴ・登山の話題
投稿日：
3×3の対角行列を生成する
> diag(3)
[,1] [,2] [,3]
[1,] 1 0 0
[2,] 0 1 0
[3,] 0 0 1
3×3の対角行列を生成し、対角成分を更新する
# 3x3の行列を生成する > a <- matrix(c(0,1,2,3,4,5,6,7,9), 3,3) > a [,1] [,2] [,3] [1,] 0 3 6 [2,] 1 4 7 [3,] 2 5 9 # 対角成分を取得する > diag(a) [1] 0 4 9 #対角成分を入れ替える > diag(a) <- 0 > a [,1] [,2] [,3] [1,] 0 3 6 [2,] 1 0 7 [3,] 2 5 0
執筆者：admin
関連記事
boneのspnbmdを使って年齢別に男女差があるかを確認してみる。検定ではWilcoxonの符号付順位決定を利用する。 boneは特定個人について骨密度を計測している。データにはIDと骨密度以外に性 …
stack()関数を用いて横長のデータを縦長にできることを教わった。このようなデータ形式の変換はよくあることなのでもう少し調べてみた。 scoreデータは以下のような形式となっている。 > he …
(1) 統計が好きか嫌いかで統計テスト1の得点について有意な差はあるか。 指導法データは score.csvに作成する。 ID,名前,性別,数学,統計,心理学テスト,統計テスト1,統計テスト2,指導法 …
rvestでスクレイピングをしようとしたら、%>%という記述が大量頻出。これ何かということで調べてみた。 https://stackoverflow.com/questions/24536154 …
データの概要 国ごとの相違を距離で表しているクロス表 > dim(countries) [1] 12 12 > names(countries) NULL > str(countri …