*1 を作ってたのしかった()というおはなし. RのRGLパッケージ. library("rgl") x<-c(0.9,0.45,0.6,0.3,0 ,0 ,0 ,0,1,0,0,0,0 ,0 ,0 ,0.9,0.45,0.6) y<-c(0.8,0.2 ,0.1,0.4,0.2,0.8,0.7,0,0,1,0,1,0.8,0.2 ,0.1,0,0,0) z<-c(0.5,0.4 ,0.8,0.5,0.5,0.7,0.2,0,0,0,1,1,0.5,0.4 ,0.8,0,0,0) labels <- c("C1","C2","C3","G","T2","T3","T1","","X","Y","Z","","","","","","","") bl <- c(1,5,2,6,3,7,8,9,8,10,8,11,10,12,11,12) gl<- c(1,13,2,14,3,15,1,16,