2011-04-12から1日間の記事一覧

2次元用を多次元錐に拡張

# df次元球の表面積 SphereSurface<-function(df,r=1){ 2*r^df*pi^(df/2)/gamma(df/2) } # df次元球の軸と偏角tであるdf-1次元球の表面積 SphereSurfaceAngle<-function(df,t,r=1){ d<-r*abs(sin(t)) ret<-0 if(df==1){ ret<-rep(2,length(t)) }else{ ret<-S…

マーカーの束ごとにパワーを計算

予定パッケージ名 sphere 関数名 SpherePower2D タイトル SpherePower2D 説明 フェノタイプ情報のベクトルと、ジェノタイプ情報の行列があるとす 使用例 SpherePower2D(Kv,Ks,CheckDists,Tiis,nperm) ソース SpherePower2D<- function (Kv, Ks, CheckDists, …