カイ二乗検定
予定パッケージ名 sphere 関数名 RandomSphere タイトル RandomSphere 説明 任意次元の、指定半径多次元球面上の均一分布の発生 使用例 RandomSphere(6) ソース RandomSphere<- function (df = 3, r = 1, n = 100) { rs <- matrix(rnorm(df * n), nrow = n) …
予定パッケージ名 sphere 関数名 TestDf1 タイトル TestDf1 説明 分割表の自由度1検定とは、分割表のセルに重みづけ係数をつけることである。 その長さNxMの重みづけベクトルを、標準化正単体座標系(自由度次元)の法線ベクトルに変換する 使用例 dfCoordina…
予定パッケージ名 sphere 関数名 RegularSpherize タイトル RegularSpherize 説明 周辺度数を共有する分割表は、ピアソンのカイ二乗統計量の 平方根をノルムとする、自由度次元空間上の点に対応付けることができる。 その対応付けを行う関数 使用例 RegularS…
予定パッケージ名 sphere 関数名 makeTblSameChiNM タイトル makeTblSameChiNM 説明 観測テーブルを与え、それと周辺度数を同じくするテーブルで、指定のカイ二乗値をとるテーブルを指定個作成する 使用例 makeTblSameChiNM (O,k,N) ソース makeTblSameChiNM …
予定パッケージ名 sphere 関数名 dfCoordinate タイトル dfCoordinate 説明 自由度次元座標を算出する 使用例 dfCoordinate(O,Obs=TRUE) ソース dfCoordinate <- function (D, Obs = FALSE) { if (Obs) { D <- tableExpAndMarginals(D)$dtable } X <- Catego…
予定パッケージ名 sphere 関数名 makeSameMargMatrix タイトル makeSameMargMatrix 説明 差分表を作る 使用例 makeSameMargMatrix(O) ソース makeSameMargMatrix <- function (O, c = 1) { E <- tableExpAndMarginals(O)$etable diff <- makeDiffMatrix(leng…
予定パッケージ名 sphere 関数名 makeDiffMatrix タイトル makeDiffMatrix 説明 差分表を作る 使用例 makeDiffMatrix(N,M,c) ソース makeDiffMatrix <- function (N, M, c = 1) { library(MCMCpack) testm <- matrix(rdirichlet(1, rep(1, N * M)), nrow = N…
予定パッケージ名 sphere 関数名 tableExpAndMarginals タイトル tableExpAndMarginals 説明 2次元分割表の周辺度数と期待値表を計算する 使用例 tableExpAndMarginals(O) ソース tableExpAndMarginals<- function (O = matrix(round(runif(N * M) * 100, 0…
予定パッケージ名 sphere 関数名 CategoryVectorND タイトル CategoryVectorND 説明 N1xN2x...xNkテーブルは(N1-1)x(N2-1)x...x(Nk-1)自由度。N1xN2x...xNkテーブルを(N1-1)x(N2-1)x...x(Nk-1)次元空間上の点に対応付ける 使用例 v<-c(3,4,5) CategoryVector…
予定パッケージ名 sphere 関数名 CategoryVector2D タイトル CategoryVector2D 説明 NxMテーブルは(N-1)x(M-1)自由度。NxMテーブルを(N-1)x(M-1)次元空間上の点に対応付ける 使用例 N<-5 M<-4 CategoryVector2D(N,M) ソース CategoryVector2D2<-function(N =…
予定パッケージ名 sphere 関数名 CategoryVector タイトル CategoryVector 説明 N+1個の頂点を持つN単体はN次元空間におさまる。その頂点座標を出す関数 使用例 N<-5 CategoryVector(N) ソース CategoryVector<- function (nc = 3) { df <- nc - 1 d <- df +…