コントロール
メモ > pool<-scan(file="B_pool.txt",sep="\t") Read 17084 items > pool<-scan(file="B_pool.txt",sep="\t") Read 2050 items > ind<-scan(file="B_ind.txt",sep="\t") Read 2550 items > indmat<-matrix(ind,nrow=50) > persp(indmat,phi=0,theta=-45,sha…
メモ > pool<-scan(file="B_pool.txt",sep="\t") Read 17084 items > pool<-scan(file="B_pool.txt",sep="\t") Read 2050 items > ind<-scan(file="B_ind.txt",sep="\t") Read 2550 items > indmat<-matrix(ind,nrow=50) > persp(indmat,phi=0,theta=-45,sha…