ryamada22 https://blog.hatena.ne.jp/ryamada22/ ryamadaの遺伝学・遺伝統計学メモ https://ryamada22.hatenablog.jp/ R 行ベクトルのペアの内積を計算する N1<-4 N2<-3 M<-matrix(runif(N1*N2),N1,N2) # 各行を単位ベクトルにする # まず長さを計算する L<-sqrt(apply(M^2,1,sum)) # 各行を各行ベクトルの長さで割って単位ベクトルにする M2<-M/L M2 # 単位ベクトルであることの確認をする apply(M2^2,1,sum) # 以下の式でペアワイズの内積が計算できる # 単位行列なのでcos(角度)になっている M2%*%t(M2) 行ベクトルのペアに距離を定義して階層的クラスタリングする N1<-4 N2<-20 M<-matrix(run… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fryamada22.hatenablog.jp%2Fentry%2F20110701%2F1309569100" title="「束」同士をペアワイズで処理する - ryamadaの遺伝学・遺伝統計学メモ" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> http://www.genome.med.kyoto-u.ac.jp/func-gen-photo/albums/StatGenetTextbook/PartIII-014.jpeg Hatena Blog https://hatena.blog 2011-07-01 10:11:40 rich https://ryamada22.hatenablog.jp/entry/20110701/1309569100 1.0 100%