2x3表 *1があるとする。 これと周辺度数を同じくする表を全部作りたい。。。その数も知りたい。。。 Rでやるなら makeTables<-function(t){ t2<-matrix(t,nrow=2) m1<-funcm1(t2) m2<-funcm2(t2) m<-sum(t2) x<-seq(0,min(m1[1],m2[1])) y<-seq(0,min(m1[1],…