powered by
data(qset2.dat)
Data from Paul O'Higgins (Hull-York Medical School) and David Johnson (Leeds)
data(qset2.dat) k<-dim(qset2.dat)[1] n<-dim(qset2.dat)[3] par(pty="s") plot(qset2.dat[,,1],xlim=c(0,250),ylim=c(0,250),type="n",xlab="",ylab="") for (i in 1:n){ points(qset2.dat[,,i],pch=c(1:k)) }
Run the code above in your browser using DataLab