シミュレーションで臨床情報とＳＮＰ多型データを作って、それを、「木」にしてみる package "sphere"が必要(こちら) RegularSpherize2<- function (O = matrix(round(runif(2 * 3) * 100, 0), 2, 3)) { EandM <- tableExpAndMarginals(O) N <- length(O[, 1…

昨日関節リウマチ(RA)の新診断基準スコアの概説をした。 それに沿って、７項目の情報を取ることにする ############# # PはRA診断基準の情報 # P[,1]は腫脹大関節数 # P[,2]は腫脹小関節数 # P[,3]はリウマトイド因子(陰性:0,陽性:1,強陽性:2) # P[,4]はACPA…